Croissant Runtime
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
crsn/examples/stdio_rev.csn

11 lines
209 B

(
(mkbf r7)
(:r)(ld r0 @cin (eof? (j :q)))
(ld @cout r0)
(cmp r0 '\n' (eq? (j :q)))
(bfpush @r7 r0)
(j :r)
(:q)(bfpop @cout @r7 (nem? (j :q)))
(ld @cout '\n')
)