2008-02-10から1日間の記事一覧
展開形にsetfが出てくる場合には注意。 複数回評価したら問題が出る。 define-modify-macroでかけたらかく ; SLIME 2007-05-24 CL-USER> (defmacro incfw(x &optional (y 1)) `(setf ,x (+ ,x ,y))) INCFW CL-USER> (setf lst nil) NIL CL-USER> (incf (car …
展開形にsetfが出てくる場合には注意。 複数回評価したら問題が出る。 define-modify-macroでかけたらかく ; SLIME 2007-05-24 CL-USER> (defmacro incfw(x &optional (y 1)) `(setf ,x (+ ,x ,y))) INCFW CL-USER> (setf lst nil) NIL CL-USER> (incf (car …