From: Martin A. <ma...@at...> - 2001-08-31 20:53:19
|
Well, it seems my last "eval-when" patch didn't cure the cause, but only one symptom. So, while the bytecode-compiler was called on the eval-when expression previously, in non-toplevel eval-when's this is what still happens: * (let () (eval-when (:compile-toplevel) 1)) debugger invoked on condition of type TYPE-ERROR: The value NIL is not of type SB-C::TAIL-SET. restarts: 0: [ABORT ] Reduce debugger level (leaving debugger). 1: [TOPLEVEL] Restart at toplevel READ/EVAL/PRINT loop. (SB-C::MERGE-TAIL-SETS # #) 0] backtrace 0: (SB-C::MERGE-TAIL-SETS # #) 1: (SB-C::CONVERT-CALL # # #) 2: (SB-C::CONVERT-CALL-IF-POSSIBLE # #) 3: (SB-C::LOCAL-CALL-ANALYZE-1 #) 4: (SB-C::LOCAL-CALL-ANALYZE #) 5: ("DEFUN ACTUALLY-COMPILE") 6: (SB-C::%WITH-COMPILATION-UNIT #<FUNCTION "CLOSURE" {93E1EE1}> :OVERRIDE NIL) 7: (SB-C::ACTUALLY-COMPILE #:EVAL-TMPFUN-1900 (LAMBDA # # # # ...)) 8: (COMPILE #:EVAL-TMPFUN-1900 (LAMBDA # # # # ...)) 9: (SB-BYTECODE::%EVAL (LET # #)) 10: (INTERACTIVE-EVAL (LET # #)) 11: (SB-IMPL::TOPLEVEL-REPL NIL) 12: (SB-IMPL::RESTART-LISP) 0] Any ideas? -- Martin Atzmueller <ma...@at...> |