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) 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) 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) static int BGMCHK(PetitComputer p)
{ {
@@ -2309,11 +2309,11 @@ class BuiltinFunction
} }
static void BGMSETD(int no, wstring label) 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) 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) static int CHKCHR(PetitComputer p, int x, int y)
{ {

2
SMILEBASIC/parser.d
View File

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