Comment 1 for bug 309469

Revision history for this message
Attila Lendvai (attila-lendvai) wrote :

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