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