How can you go from (5 . 2开发者_高级运维) to (5 2) ??
Is this what you're looking for?
(define (pair-to-list pp)
(list (car pp) (cdr pp)))
(pair-to-list '(5 . 2))
(pair-to-list (cons 5 2))
How can you go from (5 . 2开发者_高级运维) to (5 2) ??
Is this what you're looking for?
(define (pair-to-list pp)
(list (car pp) (cdr pp)))
(pair-to-list '(5 . 2))
(pair-to-list (cons 5 2))
上一篇:只留蝉儿在笑是什么歌啊??
阿司匹林多久浇一次花?:下一篇
精彩评论