2009-11-01から1ヶ月間の記事一覧
letでローカル束縛しようとしたときに上手くいかなかったのでメモ。受け取った二つの引数をそれぞれ二分木の要素にして返す関数(のつもり)をこんな感じで定義。 (defun tree (l r) (let ((tree '((left . nil) (right . nil)))) (setcdr (assoc 'left tree…
letでローカル束縛しようとしたときに上手くいかなかったのでメモ。受け取った二つの引数をそれぞれ二分木の要素にして返す関数(のつもり)をこんな感じで定義。 (defun tree (l r) (let ((tree '((left . nil) (right . nil)))) (setcdr (assoc 'left tree…