fork download
  1. (begin (define (ZED+ ZEDone ZEDtwo) (cond (#t (+ ZEDone ZEDtwo)) (else err))) (define (ZEDA+B) (cond (#t (ZED+ (ZEDread) (ZEDread))) (else err))) (define (ZEDread) (cond (#t (read)) (else err))))
  2. (display (ZEDA+B))
Success #stdin #stdout 0.03s 4176KB
stdin
1 2
stdout
3