Skip to content

Commit 8e780c5

Browse files
committed
Fixes parsing of variable names starting with "NEXT"
1 parent 457d65b commit 8e780c5

3 files changed

Lines changed: 11 additions & 1 deletion

File tree

src/basic.syn

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -687,7 +687,7 @@ PARSE_LINE_COMMAND: statement
687687
"For" VAR_WORD_LVALUE_SADDR EQUAL emit TOK_PUSH EXPR emit TOK_DPOKE \
688688
"To" EXPR STEP_OPTIONAL \
689689
emit { TOK_FOR, TOK_CNJUMP, LT_FOR_2 } E_PUSH_LT emit LT_FOR_1 E_PUSH_LT
690-
"Next" emit TOK_FOR_NEXT emit TOK_CJUMP NEXT_VARNAME E_POP_FOR emit TOK_FOR_EXIT
690+
"Next" emit TOK_FOR_NEXT emit TOK_CJUMP NEXT_VARNAME E_EOL E_POP_FOR emit TOK_FOR_EXIT
691691
"ELse" E_EOL emit TOK_JUMP emit LT_ELSE E_ELSEIF
692692
"ELIf" emit { TOK_JUMP, LT_ELIF } E_ELSEIF FORCE_BOOL_EXPR emit { TOK_CJUMP, LT_IF } E_PUSH_LT
693693
"Endif" E_EOL E_POP_IF

testsuite/tests/err-next.bas

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
' Test for error parsing variables that start with NEXT
2+
? "Start"
3+
NEXT_TIME=1
4+
? NEXT_TIME
5+

testsuite/tests/err-next.chk

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
Name: Test for error parsing variables that start with NEXT
2+
Test: run
3+
Output:
4+
Start
5+
1

0 commit comments

Comments
 (0)