bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Fix Goto/GosubExpr

Browse Source
This commit is contained in:
otya128
2016-12-07 20:12:58 +09:00
parent 92d5026c72
commit 6b2a065cb7
1 changed files with 23 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
SMILEBASIC/VM.d
View File

@@ -837,12 +837,20 @@ class GotoExpr : Code
vm.pop(label);
if(label.isString)
{
int pc;
if (sc && sc.func)
{
vm.pc = sc.func.label[label.castString] - 1;
return;
pc = sc.func.label.get(label.castString, int.min);
}
vm.pc = vm.currentSlot.globalLabel[label.castString] - 1;
else
{
pc = vm.currentSlot.globalLabel.get(label.castString, int.min);
}
if (pc == int.min)
{
throw new UndefinedLabel();
}
vm.pc = pc - 1;
}
else
{
@@ -896,13 +904,21 @@ class GosubExpr : Code
vm.pop(label);
if(label.isString)
{
vm.pushpc;//vm.push(Value(vm.pc));
vm.pushpc;
int pc;
if (sc && sc.func)
{
vm.pc = sc.func.label[label.castString] - 1;
return;
pc = sc.func.label.get(label.castString, int.min);
}
vm.pc = vm.currentSlot.globalLabel[label.castString] - 1;
else
{
pc = vm.currentSlot.globalLabel.get(label.castString, int.min);
}
if (pc == int.min)
{
throw new UndefinedLabel();
}
vm.pc = pc - 1;
}
else
{