forked from MightyPork/crsn
parent
ee59096821
commit
9aee9ca143
@ -0,0 +1,9 @@ |
|||||||
|
( |
||||||
|
(mkbf r7) |
||||||
|
(:r)(ld r0 @stdin) |
||||||
|
(cmp r0 '\n' (eq? (j :q))) |
||||||
|
(bfpush @r7 r0) |
||||||
|
(j :r) |
||||||
|
(:q)(bfpop @stdout @r7 (nem? (j :q))) |
||||||
|
(ld @stdout '\n') |
||||||
|
) |
Loading…
Reference in new issue