bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Fix NEXT (I,J,K...)

Browse Source
This commit is contained in:
otya128
2016-12-20 22:05:00 +09:00
parent bae2958ca1
commit 760c64113e
1 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
SMILEBASIC/parser.d
View File

@@ -799,6 +799,11 @@ class Parser
statements.addStatement(statement);
}
}
ignoreVarNext();
return statements;
}
void ignoreVarNext()
{
lex.popFront();
auto token = lex.front;
if(token.type == TokenType.Iden)
@@ -812,9 +817,9 @@ class Parser
token = lex.front;
if(token.type != TokenType.Iden) break;
lex.popFront();
token = lex.front;
}
}
return statements;
}
Statements whileStatements()
{
@@ -1046,6 +1051,9 @@ class Parser
node = new Break(lex.location);
break;
case TokenType.Next:
node = new Continue(lex.location);
ignoreVarNext();
return node;
case TokenType.Continue:
node = new Continue(lex.location);
break;