summaryrefslogtreecommitdiff
path: root/05/tokenize.b
diff options
context:
space:
mode:
Diffstat (limited to '05/tokenize.b')
-rw-r--r--05/tokenize.b2
1 files changed, 2 insertions, 0 deletions
diff --git a/05/tokenize.b b/05/tokenize.b
index 2fc4bc1..7475def 100644
--- a/05/tokenize.b
+++ b/05/tokenize.b
@@ -588,10 +588,12 @@ function read_number_suffix
function print_tokens
argument tokens
+ argument tokens_end
local p
local s
p = tokens
:print_tokens_loop
+ if p ]= tokens_end goto print_tokens_loop_end
if *1p == 0 goto print_tokens_loop_end
if *1p > 20 goto print_token_keyword
if *1p == TOKEN_CONSTANT_INT goto print_token_int