deque-to-list.scm (311B)
1 (define-library (sicp solutions 3_23 deque-to-list) 2 (import (scheme base)) 3 4 (import (sicp solutions 3_23 front-ptr)) 5 (import (prefix (sicp solutions 3_23 doubly-linked-list) dll:)) 6 7 (export deque->list) 8 9 (begin 10 (define (deque->list deque) 11 (dll:doubly-linked-list->list (front-ptr deque)))))