bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Implement CHKLABEL(label,global)

Browse Source
This commit is contained in:
otya128
2017-07-09 23:32:36 +09:00
parent 2d2c09e38b
commit be5424a203
2 changed files with 11 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
SMILEBASIC/VM.d
View File

@@ -438,7 +438,7 @@ class VM
return true;
return false;
}
bool chklabel(wstring label)
bool chklabel(wstring label, bool global)
{
auto name = parse(label);
VMSlot slot;
@@ -454,10 +454,15 @@ class VM
{
slot = currentSlot;
}
if (currentFunction)
{
if (name.name in currentFunction.label)
return true;
if (!global)
return false;
}
if (name.name in slot.globalLabel)
return true;
if (currentFunction && name.name in currentFunction.label)
return true;
return false;
}
bool chkvar(wstring var)