練習問題 P.53 deep-copy-list
ネストしたリストも全てコピーするって、copy-list でも出来ていると思うんやけど..
(define (deep-copy-list lis) (if (pair? lis) (cons (deep-copy-list (car lis)) (deep-copy-list (cdr lis))) #?=lis))
ネストされているのも含めて全ての要素が最後の行の lis で評価される。
ネストしたリストも全てコピーするって、copy-list でも出来ていると思うんやけど..
(define (deep-copy-list lis) (if (pair? lis) (cons (deep-copy-list (car lis)) (deep-copy-list (cdr lis))) #?=lis))
ネストされているのも含めて全ての要素が最後の行の lis で評価される。