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

Mark Evenson evenson at panix.com
Sun Apr 5 09:13:31 UTC 2015


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."




More information about the armedbear-devel mailing list