6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-14 14:26:27 +00:00
Code Issues Projects Releases Wiki Activity

Special handling for a few more runtime functions.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5737 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2012-06-24 14:29:27 +00:00
parent 7aefd9b4e7
commit 43d0d2fb78
1 changed files with 80 additions and 63 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
src/cc65/codeent.c
View File

@@ -812,13 +812,24 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs)
Out->SRegHi = UNKNOWN_REGVAL; Out->SRegHi = UNKNOWN_REGVAL;
} }
/* ## FIXME: Quick hack for some known functions: */ /* ## FIXME: Quick hack for some known functions: */
if (strcmp (E->Arg, "tosandax") == 0) { if (strcmp (E->Arg, "complax") == 0) {
if (RegValIsKnown (In->RegA)) {
Out->RegA = (In->RegA ^ 0xFF);
}
if (RegValIsKnown (In->RegX)) {
Out->RegX = (In->RegX ^ 0xFF);
}
} else if (strcmp (E->Arg, "tosandax") == 0) {
if (In->RegA == 0) { if (In->RegA == 0) {
Out->RegA = 0; Out->RegA = 0;
} }
if (In->RegX == 0) { if (In->RegX == 0) {
Out->RegX = 0; Out->RegX = 0;
} }
} else if (strcmp (E->Arg, "tosaslax") == 0) {
if ((In->RegA & 0x0F) >= 8) {
Out->RegA = 0;
}
} else if (strcmp (E->Arg, "tosorax") == 0) { } else if (strcmp (E->Arg, "tosorax") == 0) {
if (In->RegA == 0xFF) { if (In->RegA == 0xFF) {
Out->RegA = 0xFF; Out->RegA = 0xFF;
@@ -826,7 +837,13 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs)
if (In->RegX == 0xFF) { if (In->RegX == 0xFF) {
Out->RegX = 0xFF; Out->RegX = 0xFF;
} }
} else if (FindBoolCmpCond (E->Arg) != CMP_INV) { } else if (strcmp (E->Arg, "tosshlax") == 0) {
if ((In->RegA & 0x0F) >= 8) {
Out->RegA = 0;
}
} else if (FindBoolCmpCond (E->Arg) != CMP_INV ||
FindTosCmpCond (E->Arg) != CMP_INV) {
/* Result is boolean value, so X is zero on output */
Out->RegX = 0; Out->RegX = 0;
} }
break; break;