bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

GOTO expr,GOSUB expr実装

Browse Source
This commit is contained in:
otya128
2015-08-29 13:38:03 +09:00
parent cc3f18ee9a
commit d05166a3b9
5 changed files with 87 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
SMILEBASIC/compiler.d
View File

@@ -737,7 +737,16 @@ class Compiler
break;
case NodeType.Goto:
{
genCodeGoto((cast(Goto)i).label, s);
auto gotou = cast(Goto)i;
if(!gotou.label)
{
compileExpression(gotou.labelexpr, s);
genCode(new GotoExpr(s));
}
else
{
genCodeGoto(gotou.label, s);
}
}
break;
case NodeType.If:
@@ -749,7 +758,15 @@ class Compiler
case NodeType.Gosub:
{
auto gosub = cast(Gosub)i;
genCodeGosub(gosub.label, s);
if(gosub.label)
{
genCodeGosub(gosub.label, s);
}
else
{
compileExpression(gosub.labelexpr, s);
genCode(new GosubExpr(s));
}
}
break;
case NodeType.Return:
@@ -969,7 +986,7 @@ class Compiler
code[i] = new RestoreCode(s.data.label[restore.label], s.data);
}
}
return new VM(code, globalIndex + 1, global, functions, s.data);
return new VM(code, globalIndex + 1, global, functions, s.data, globalLabel);
}
}