From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Sun, 16 Aug 2009 21:01:16 +0000 (+0000)
Subject: Use correct adddressing mode for "asl a".
X-Git-Tag: V2.13.0rc1~225
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=1bd4abdc6793cc309dbab9594b434f3c9c436ae3;p=cc65

Use correct adddressing mode for "asl a".


git-svn-id: svn://svn.cc65.org/cc65/trunk@4030 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/src/cc65/coptptrload.c b/src/cc65/coptptrload.c
index 2bde19cea..85401c0fd 100644
--- a/src/cc65/coptptrload.c
+++ b/src/cc65/coptptrload.c
@@ -728,7 +728,7 @@ unsigned OptPtrLoad7 (CodeSeg* S)
                 CodeLabel* Lab;
 
                 /* asl a */
-                X = NewCodeEntry (OP65_ASL, AM65_IMP, "a", 0, L[0]->LI);
+                X = NewCodeEntry (OP65_ASL, AM65_ACC, "a", 0, L[0]->LI);
                 CS_InsertEntry (S, X, IP++);
 
                 /* Generate clc first, since we need the label */
@@ -756,7 +756,7 @@ unsigned OptPtrLoad7 (CodeSeg* S)
                 CS_InsertEntry (S, X, IP++);
 
                 /* asl a */
-                X = NewCodeEntry (OP65_ASL, AM65_IMP, "a", 0, L[0]->LI);
+                X = NewCodeEntry (OP65_ASL, AM65_ACC, "a", 0, L[0]->LI);
                 CS_InsertEntry (S, X, IP++);
 
                 /* rol tmp1 */