Macintosh-SW/mpw
1
0
Fork 0
mirror of https://github.com/ksherlock/mpw.git synced 2025-01-10 05:29:48 +00:00
Code Issues Projects Releases Wiki Activity

ranged/count-based ;l listings

Browse Source
This commit is contained in:
Kelvin Sherlock 2013-07-13 13:46:41 -04:00
parent 69cd091397
commit ccd3273ff0
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
bin/parser.lemon
View File

@ -182,6 +182,16 @@ stmt ::= expr(a) SEMIL EOL.
Debug::List(a); Debug::List(a);
} }
stmt ::= expr(a) AT expr(b) SEMIL EOL.
{
Debug::List(a, (int)b);
}
stmt ::= expr(a) COLON expr(b) SEMIL EOL.
{
Debug::List(a, b);
}
stmt ::= DREGISTER(a) EQ expr(b) EOL. stmt ::= DREGISTER(a) EQ expr(b) EOL.
{ {
@ -232,6 +242,7 @@ unary(rhs) ::= BANG unary(a). { rhs = !a; }
unary(rhs) ::= STAR unary(a). [BANG] { rhs = Debug::ReadLong(a); } unary(rhs) ::= STAR unary(a). [BANG] { rhs = Debug::ReadLong(a); }
term(rhs) ::= LPAREN expr(a) RPAREN. { rhs = a; } term(rhs) ::= LPAREN expr(a) RPAREN. { rhs = a; }
term(rhs) ::= INTEGER(a). { rhs = a; } term(rhs) ::= INTEGER(a). { rhs = a; }
term(rhs) ::= DREGISTER(a). { rhs = cpuGetDReg(a); } term(rhs) ::= DREGISTER(a). { rhs = cpuGetDReg(a); }