comp.lang.lisp

William James

12/2/2015 12:31:00 AM

WJ wrote:

> David Bakhash wrote:
>
> > > concise and meaningful, but using recursion to read
> > > records out of a simple sequential file like Slade's Lisp book?
> > > Keep what is simple, simple...like Perl:
> >
> > > while ($line = <infile>) {
> > > print $line;
> > > }
> >
> > CL makes this particular example quite easy too:
> >
> > ;; unchecked...
> > (with-open-file (file "file.txt")
> > (loop for line = (read-line file nil)
> > while line
> > do (print line)))

Ocaml:

let chan = open_in "args.ml" in
try
while true do print_endline (input_line chan) done
with End_of_file -> close_in chan ;;

--
How does the Swedish political elite respond to their largest cities breaking
down? By pretending there is no problem. The media elite shares the same
contempt for and fear of the common people, and has largely played along.
fjordman.blogspot.ca/2005/05/is-swedish-democracy-collapsing.html