[Openmcl-devel] Why is remhash being called here?
ron at flownet.com
Sun Jun 30 15:12:14 CDT 2013
Welcome to Clozure Common Lisp Version 1.9-dev-r15769M-trunk (DarwinX8664)!
? (defun _$-reader (stream char)
(unread-char char stream)
(let ((*readtable* (copy-readtable nil)))
? (set-macro-character #\$ '_$-reader t)
? (trace remhash)
0> Calling (REMHASH \$X #<HASH-TABLE :TEST EQ size 2/60 #x302000E27E1D>)
<0 REMHASH returned T
? (eval (read-from-string "'$x"))
More information about the Openmcl-devel