屑俺日記

僕の備忘録(PC、UN*X、ネットワーク関連が中心)なんです。
自分の書いたところは適当(な時とか)に書き換えますので御了承を。

2013-04-07(Sun) 風。近くの灰雲が速く、遠くの白雲は遅く流れる

手習いの例題を、ClispとEmacsLisp向けに。

(defun firsts (list)
  (cond
   ((null list) '())
   (t (cons (car (car list))
            (firsts (cdr list))))))

(firsts	'((1 2 3) (4 5 6) (a b c)))
(1 4 a)

defun hogehoge の後に lambda を書いてもなんかうまくいかないみたい。

前にかいたことの補足。
Emacs Lisp では最後を除き nil になった。

(eq 'a 'A)
nil
(eq 'a '|A|)
nil
(eq 'a '|a|)
nil
(eq 'a 'a)
t

リンクはご自由にどうぞ。でもURLや内容が変った場合はあしからず。