i cannot reproduce this anymore. here's what i tried:
CL-USER> (TRACE GETHASH) (GETHASH) CL-USER> (gethash 42 (make-hash-table)) 0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10090B8B63}>) 0: GETHASH returned NIL NIL NIL NIL CL-USER> (trace print) (PRINT) CL-USER> (gethash 42 (make-hash-table)) 0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10090E9643}>) 0: GETHASH returned NIL NIL NIL NIL CL-USER> (trace format) (FORMAT) CL-USER> (gethash 42 (make-hash-table)) 0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10091097A3}>) 0: GETHASH returned NIL NIL NIL NIL CL-USER> (format nil "foo") 0: (FORMAT NIL "foo") 0: FORMAT returned "foo" "foo" CL-USER> (trace car list) (CAR LIST) CL-USER> (car (list 42 43)) 0: (LIST 42 43) 0: LIST returned (42 43) 0: (CAR (42 43)) 0: CAR returned 42 42
i cannot reproduce this anymore. here's what i tried:
CL-USER> (TRACE GETHASH)
(GETHASH)
CL-USER> (gethash 42 (make-hash-table))
0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10090B8B63}>)
0: GETHASH returned NIL NIL
NIL
NIL
CL-USER> (trace print)
(PRINT)
CL-USER> (gethash 42 (make-hash-table))
0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10090E9643}>)
0: GETHASH returned NIL NIL
NIL
NIL
CL-USER> (trace format)
(FORMAT)
CL-USER> (gethash 42 (make-hash-table))
0: (GETHASH 42 #<HASH-TABLE :TEST EQL :COUNT 0 {10091097A3}>)
0: GETHASH returned NIL NIL
NIL
NIL
CL-USER> (format nil "foo")
0: (FORMAT NIL "foo")
0: FORMAT returned "foo"
"foo"
CL-USER> (trace car list)
(CAR LIST)
CL-USER> (car (list 42 43))
0: (LIST 42 43)
0: LIST returned (42 43)
0: (CAR (42 43))
0: CAR returned 42
42