6 lines
131 B
Text
6 lines
131 B
Text
|
(defun print-list (xs)
|
||
|
|
(if (endp xs)
|
||
|
|
nil
|
||
|
|
(prog2$ (cw "~x0~%" (first xs))
|
||
|
|
(print-list (rest xs)))))
|