From: Paul F. D. <di...@dl...> - 2004-12-01 03:12:42
|
The following snippet illustrates the problem: * (compile nil '(lambda (x) (random (if x 10 20)))) debugger invoked on a TYPE-ERROR in thread 29783: The value #<SB-KERNEL:UNION-TYPE (OR (INTEGER 10 10) (INTEGER 20 20))> is not of type SB-KERNEL:NUMERIC-TYPE. You can type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT ] Reduce debugger level (leaving debugger, returning to toplevel). 1: [TOPLEVEL] Restart at toplevel READ/EVAL/PRINT loop. ("#'(LAMBDA (#:G173) (LET* # #))" #<SB-C::COMBINATION :FUN #<SB-C::REF :LEAF # {99B5611}> :ARGS ((# #)) {99B5649}>) Paul |