Re: [armedbear-devel] Compiler loses lexical macro in (eval-when (:compile-toplevel ...))

On 3/21/14, 4:48, Douglas Katzman wrote:

(eval-when (:compile-toplevel :load-toplevel :execute) (defvar *count* 0) (macrolet ((something (sym) `(setf (get ,sym 'uniqueid) (incf *count*)))) (defun register-it (x) (something x)))) (eval-when (:compile-toplevel :execute) (format t "~&OK so far~%") (register-it :foo)) (eval-when (:compile-toplevel :execute) (format t "~&Got ~D~%" (symbol-plist :foo)))

Confirmed and filed as [ticket-351][]. Thanks for the bug report. [ticket-351]: http://abcl.org/trac/ticket/351 -- "A screaming comes across the sky. It has happened before, but there is nothing to compare to it now."