Read a file line by line: Difference between revisions

Content added Content deleted
(→‎{{header|Common Lisp}}: : indentation and file name correction)
Line 330: Line 330:
}</lang>
}</lang>
=={{header|Common Lisp}}==
=={{header|Common Lisp}}==
<lang lisp>(with-open-file (input "~/tmp/seding")
<lang lisp>
(loop for line = (read-line input nil)
(with-open-file (input "file.txt")
while line do (format t "~a~%" line)))</lang>
(loop for line = (read-line input nil)
while line do (format t "~a~%" line)))</lang>


=={{header|D}}==
=={{header|D}}==