If you "visibly modify" a key, consequences are unpredictable:
(LET((hash-table(MAKE-HASH-TABLE:test 'EQUALP))) (SETF(GETHASHhash-tablehash-table)T) (GETHASHhash-tablehash-table)) ⇒; ⇒NILNIL
because ( modifies SETF GETHASH)hash-table, the very next
GETHASH does not find it in itself.
| These notes document CLISP version 2.49 | Last modified: 2010年07月07日 |