bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Implement PRGNAME$

Browse Source
This commit is contained in:
otya128
2016-12-28 16:27:49 +09:00
parent 5505d7c9f0
commit 88c015c34f
4 changed files with 23 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
SMILEBASIC/builtinfunctions.d
View File

@@ -2280,7 +2280,7 @@ class BuiltinFunction
//not exist
return;
}
p.program.slot[lot].load(txt);
p.program.slot[lot].load(filename, txt);
return;
}
if(resname.indexOf("GRP") == 0)
@@ -3211,6 +3211,14 @@ class BuiltinFunction
import otya.smilebasic.program;
return p.program.size(slot, cast(SizeType)type);
}
static wstring PRGNAME(PetitComputer p)
{
return p.program.name(p.vm.currentSlotNumber);
}
static wstring PRGNAME(PetitComputer p, int slot)
{
return p.program.name(slot);
}
//alias void function(PetitComputer, Value[], Value[]) BuiltinFunc;
static BuiltinFunctions[wstring] builtinFunctions;
static wstring getBasicName(BFD)(const wstring def)