diff --git a/tar.tal b/tar.tal index c9a022a..9815cbf 100644 --- a/tar.tal +++ b/tar.tal @@ -59,7 +59,7 @@ ( print up to `len` bytes from string. stops on NUL. ) @lprint ( s* len* -> ) OVR2 ADD2 SWP2 ( limit* s* ) - &loop LDAk ?{ !&done } ( limit* s*) + &loop LDAk ?{ !&done } ( limit* s* ) LDAk #18 DEO INC2 GTH2k ?&loop ( limit* s+1* ) &done POP2 POP2 JMP2r ( )