【scheme】こないだのlistで書き忘れた

リストの中身を全部出力したかっただけなんだけどな。こんなことになっちゃった。センスなさすぎﾜﾛﾀ系？

;;list (define x (list 1 2 3)) ;;display list (define disp-list   (lambda (l)     (if (not (null? l))       (begin         (display (car l))          (newline)         (disp-list (cdr l)))))) (disp-list x) ;;=> 1 ;;=> 2 ;;=> 3