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

Fixed an error in OptPtrLoad16.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@4139 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-09-08 21:10:19 +00:00
parent e68332a10b
commit 079358c3c1
1 changed files with 19 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
src/cc65/coptptrload.c
View File

@@ -1336,22 +1336,28 @@ unsigned OptPtrLoad16 (CodeSeg* S)
CodeEntry* X; CodeEntry* X;
/* Store the high byte */ /* stx ptr1+1 */
X = NewCodeEntry (OP65_STA, AM65_ZP, "ptr1", 0, L[0]->LI); X = NewCodeEntry (OP65_STA, AM65_ZP, "ptr1", 0, L[1]->LI);
CS_InsertEntry (S, X, I); CS_InsertEntry (S, X, I+2);
/* Store the low byte */ /* sta ptr1 */
X = NewCodeEntry (OP65_STX, AM65_ZP, "ptr1+1", 0, L[0]->LI); X = NewCodeEntry (OP65_STX, AM65_ZP, "ptr1+1", 0, L[1]->LI);
CS_InsertEntry (S, X, I+1); CS_InsertEntry (S, X, I+3);
/* Delete the call to ldauidx */ /* ldy ... */
CS_DelEntry (S, I+3); X = NewCodeEntry (L[0]->OPC, L[0]->AM, L[0]->Arg, 0, L[0]->LI);
CS_InsertEntry (S, X, I+4);
/* Load the high and low byte */ /* ldx #$00 */
X = NewCodeEntry (OP65_LDX, AM65_IMM, "$00", 0, L[0]->LI); X = NewCodeEntry (OP65_LDX, AM65_IMM, "$00", 0, L[1]->LI);
CS_InsertEntry (S, X, I+3); CS_InsertEntry (S, X, I+5);
X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "ptr1", 0, L[0]->LI);
CS_InsertEntry (S, X, I+4); /* lda (ptr1),y */
X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "ptr1", 0, L[1]->LI);
CS_InsertEntry (S, X, I+6);
/* Delete the old code */
CS_DelEntries (S, I, 2);
/* Remember, we had changes */ /* Remember, we had changes */
++Changes; ++Changes;