ANSI Common Lisp (gethash に push)

ポール グレアム の ANSI Common Lisp をひさしぶりに読んでいるんだけど、おもしろいな。

知らないことがいっぱいでてくる。 gethash にいきなり push できるとか。

(setf hash (make-hash-table))

(push 1 (gethash 'a hash))
(push 2 (gethash 'a hash))
(gethash 'a hash)
;; => (2 1)

もうちょっと setf について考えた方がいいのかもしれないw