『ANSI Common Lisp』のサンプルとxyzzy

メモ。
xyzzyで、ポール・グレアム(著),久野雅樹(訳),『ANSI Common Lisp』p90で例として挙がっている以下のコード、defunが(setf f)という形の引数をとるものは処理できなかった。xyzzyのリファレンスを見ても、できるようには書いていない。

(defun primo (lst) (car lst))

(defun (setf primo) (val lst)
  (setf (car lst) val))

ちょっと残念。
(2006/08/01:インデントがちょっとおかしかったので修正した。)