2010-01-31から1日間の記事一覧
6.5 簡単なリスト処理 空でないリストの最後の対を見つけるlast-pairを書いてみる。こんな感じだろうか? (define (last-pair2 lis) (if (pair? lis) (last-pair2 (cdr lis)) lis)) gosh> (last-pair2 '(1 2 3)) () gosh> (last-pair2 '(1 . 3)) 3 だめだ。…
6.5 簡単なリスト処理 空でないリストの最後の対を見つけるlast-pairを書いてみる。こんな感じだろうか? (define (last-pair2 lis) (if (pair? lis) (last-pair2 (cdr lis)) lis)) gosh> (last-pair2 '(1 2 3)) () gosh> (last-pair2 '(1 . 3)) 3 だめだ。…