問題2-17

リストの最後の要素だけからなるリストを返せ!

(define (last-pair list)
  (cond ((null? list) ())
	((null? (cdr list)) list)
	(else (last-pair (cdr list)))))

最初の条件は、空リストが与えられたとき用で、こんな感じになる。

gosh> (last-pair (list 33 72 149 34))
(34)
gosh> (last-pair (list))
()