RosettaCodeData/Task/Input-loop/PicoLisp/input-loop.l

5 lines
72 B
Common Lisp

(in "file.txt"
(make
(until (eof)
(link (line)) ) ) )