[armedbear-devel] compiler macro, flet, inline => Failed AVER: "NIL"
Armed Bear Common Lisp 1.2.0-dev-svn-14276 Java 1.7.0_04 Oracle Corporation The warning and error occurs on the second COMPILE call. The AVER is in COMPILE-VAR-REF. (defun foo (n) n) (define-compiler-macro foo (n) `(flet ((bar (k) k)) (declare (inline bar)) (bar ,n))) (compile nil '(lambda () (foo 3))) (compile nil '(lambda () (foo 3))) ; Caught STYLE-WARNING: ; The variable K is defined but never used. compile-var-ref general case ; Compilation unit finished ; Caught 1 STYLE-WARNING condition => Failed AVER: "NIL" [Condition of type SIMPLE-ERROR]
On 12/2/12 7:59 PM, James M. Lawrence wrote:
Armed Bear Common Lisp 1.2.0-dev-svn-14276 Java 1.7.0_04 Oracle Corporation
The warning and error occurs on the second COMPILE call. The AVER is in COMPILE-VAR-REF.
(defun foo (n) n)
(define-compiler-macro foo (n) `(flet ((bar (k) k)) (declare (inline bar)) (bar ,n)))
(compile nil '(lambda () (foo 3))) (compile nil '(lambda () (foo 3)))
Filed as [#273][], probably won't make abcl-1.1.0, thanks for the report! [#273]: http://trac.common-lisp.net/armedbear/ticket/273 -- "A screaming comes across the sky. It has happened before, but there is nothing to compare it to now."
participants (2)
-
James M. Lawrence -
Mark Evenson