前回 リスト遊び 7-5 while と 再帰 - by shigemk2まずはこれを見てほしい。 前に実装したreplのプログラムである(下にも書いた) リスト遊び 7-2 while - by shigemk2 (defun repl (lst old new) ;; *1 (let (tmp ret) (while lst (cond ((eq old (car lst))…

前回 リスト遊び 7-4 catch と throw - by shigemk2いつぞやのmemq*を、catch throw while を使って書き換えてみる。 いつぞやのやつ リスト遊び 5-4 集合* - by shigemk2 (defun memq* (x set) (catch 'loop (while set (cond ;; リストの中にリストがあっ…