improve the rev example · f2073fe7f4 - crsn - MightyPork's Gitea

improve the rev example

pull/21/head

Ondřej Hruška 4 years ago

parent acc36b1959

commit f2073fe7f4

Signed by:

MightyPork

GPG Key ID: 2C5FD5035250423D

1 changed files with 2 additions and 1 deletions

								
									3

examples/stdio_rev.csn

								Unescape
								Escape
							
									View File
								
					@ -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)