2007-04-24 ■ Lisp メモ CommonLispでは、 putprop → setf (setf (get 'nobu 'age) 19) (get 'nobu 'age) (symbol-plist 'nobu) (remprop 'nobu 'age) (get 'nobu 'age)