fork download
  1. (let loop ((number (read)))
  2. (if (= number 42)
  3. (exit)
  4. (begin
  5. (print number)
  6. (loop (read)))))
Success #stdin #stdout 0.01s 7796KB
stdin
1
2
88
42
10
stdout
1
2
88