forked from MightyPork/crsn
improve the rev example
This commit is contained in:
@@ -1,6 +1,7 @@
|
|||||||
(
|
(
|
||||||
(mkbf r7)
|
(mkbf r7)
|
||||||
(:r)(ld r0 @cin)
|
(:r)(ld r0 @cin (eof? (j :q)))
|
||||||
|
(ld @cout r0)
|
||||||
(cmp r0 '\n' (eq? (j :q)))
|
(cmp r0 '\n' (eq? (j :q)))
|
||||||
(bfpush @r7 r0)
|
(bfpush @r7 r0)
|
||||||
(j :r)
|
(j :r)
|
||||||
|
|||||||
Reference in New Issue
Block a user