the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added new address size override commands z:, a: and f:.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2222 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2003-06-17 20:22:14 +00:00
parent 7016496564
commit 3cbd6ca29b
3 changed files with 62 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
src/ca65/scanner.c
View File

@@ -767,13 +767,31 @@ Again:
ReadIdent (0);
/* Check for special names */
if (SVal [1] == '\0') {
if (SVal[1] == '\0') {
switch (toupper (SVal [0])) {
case 'A':
Tok = TOK_A;
if (C == ':') {
NextChar ();
Tok = TOK_OVERRIDE_ABS;
} else {
Tok = TOK_A;
}
return;
case 'F':
if (C == ':') {
NextChar ();
Tok = TOK_OVERRIDE_FAR;
} else {
Tok = TOK_IDENT;
}
return;
case 'S':
Tok = TOK_S;
return;
case 'X':
Tok = TOK_X;
return;
@@ -782,9 +800,14 @@ Again:
Tok = TOK_Y;
return;
case 'S':
Tok = TOK_S;
return;
case 'Z':
if (C == ':') {
NextChar ();
Tok = TOK_OVERRIDE_ZP;
} else {
Tok = TOK_IDENT;
}
return;
default:
Tok = TOK_IDENT;