add reverse example

This commit is contained in:
2020-10-10 01:53:10 +02:00
parent ee59096821
commit 9aee9ca143
+9
View File
@@ -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')
)