Fwd: possible abcl bug: incorrectly deletes "unused" local function

[Mark Evenson]

On 4/4/15 18:28, Erik Huelsmann wrote:

[…]

The copy of the bug code you sent me got garbled as follows:

(defun =sample2 (n)
  (macrolet ((f (result x)
                `(list 'more (lambda () (=f ,result ,x))))
             (g (result x)
                `(list 'more (lambda () (=g ,result ,x)))))
    (labels ((=f (result x)
               (if (zerop x)
                 result
                 (g (1+ result) (1- x))))
             (=g (result x)
               (f result x)))
      (f 0 n))))


I assume that one is supposed to remove all the #\= characters?	

-- 
"A screaming comes across the sky.  It has happened before, but there
is nothing to compare to it now."