Apple-2-SW
/
jsbasic
mirror of https://github.com/inexorabletash/jsbasic.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fix initialization

This commit is contained in:
Joshua Bell 2021-03-31 20:45:46 -07:00
parent b75c1f027f
commit b0b2299cfb
1 changed files with 6 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
basic.js
View File

@ -601,11 +601,9 @@ this.basic = (function() {
}
},
'for': function FOR(varname, from, to, step) {
state.variables[varname] = from;
'for': function FOR(varname, to, step) {
state.stack.push({
index: varname,
from: from,
to: to,
step: step,
for_next: state.stmt_index,
@ -1827,12 +1825,11 @@ this.basic = (function() {
throw parse_error("Syntax error: Expected floating point variable");
}
identifiers.variables[name] = true;
return slib('for',
quote(name),
match("operator", "=") && parseNumericExpression(),
match("reserved", kws.TO) && parseNumericExpression(),
test('reserved', kws.STEP, true) ? parseNumericExpression() : '1');
return 'state.variables[' + quote(name) + '] = ' +
(match("operator", "=") && parseNumericExpression()) + ';' +
slib('for', quote(name),
match("reserved", kws.TO) && parseNumericExpression(),
test('reserved', kws.STEP, true) ? parseNumericExpression() : '1');
case kws.NEXT: // NEXT [i [,j ... ] ]
args = [];