6 lines
94 B
Plaintext
6 lines
94 B
Plaintext
|
(define (last-pair l)
|
||
|
|
(if (null? (cdr l))
|
||
|
|
(list (car l))
|
||
|
|
(last-pair (cdr l))))
|
||
|
|
|