bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Fix label parsing

Browse Source
This commit is contained in:
otya128
2017-07-10 19:41:23 +09:00
parent fb1ca9bc0a
commit 0975903757
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
SMILEBASIC/builtinfunctions.d
View File

@@ -2296,11 +2296,11 @@ class BuiltinFunction
}
static void BGMSTOP(PetitComputer p, int track)
{
writeln("NOTIMPL:BGMSTOP %d", track);
writefln("NOTIMPL:BGMSTOP %d", track);
}
static void BGMSTOP(PetitComputer p, int track, int fade)
{
writeln("NOTIMPL:BGMSTOP %d,%d", track, fade);
writefln("NOTIMPL:BGMSTOP %d,%d", track, fade);
}
static int BGMCHK(PetitComputer p)
{
@@ -2309,11 +2309,11 @@ class BuiltinFunction
}
static void BGMSETD(int no, wstring label)
{
writeln("NOTIMPL:BGMSETD %d,%s", no, label);
writefln("NOTIMPL:BGMSETD %d,%s", no, label);
}
static void BGMSET(int no, wstring mml)
{
writeln("NOTIMPL:BGMSET %d,%s", no, mml);
writefln("NOTIMPL:BGMSET %d,%s", no, mml);
}
static int CHKCHR(PetitComputer p, int x, int y)
{

2
SMILEBASIC/parser.d
View File

@@ -270,7 +270,7 @@ class Lexical
}
if (isLabel)
{
token = Token(TokenType.Label, TokenValue(iden));
token = Token(TokenType.Label, TokenValue(std.uni.toUpper(iden)));
}
else
{