fork(2) download
  1. (define yoba-def
  2. ((lambda()
  3.  
  4. (define n 0)
  5. (lambda ()
  6. (set! n (+ 1 n))
  7. n))))
  8.  
  9. (let loop ((n (read)))
  10. (if (< 0 n)
  11. (begin
  12. (display (yoba-def))
  13. (newline)
  14. (loop (- n 1)))))
Runtime error #stdin #stdout 0.03s 4132KB
stdin
Standard input is empty
stdout
Standard output is empty