fork(1) download
  1. (loop
  2. for line = (read *standard-input* nil :eof)
  3. while (not (equal line :eof))
  4. do (format t "~B~%" line))
Success #stdin #stdout 0.03s 10544KB
stdin
1
2
10
42
11
stdout
1
10
1010
101010
1011