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 2bde19ceac224d137c2555499f9c5843768bf305..85401c0fdf28129249d7fe8745efadd6255e5946 100644 (file)
--- 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 */