fork download 
  1. (loop with EOF = "42"
  2.       for input = (read-line nil nil EOF)
  3.       until (equal input EOF)
  4.       do (write-line input))
  5.  
Success #stdin #stdout 0s 203840KB
comments (?)
stdin 
1
2
3
42
5
stdout 
1
2
3
https://ideone.com/QQzEQh
language:
Common Lisp (sbcl 1.4.16)
created:
5 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!