From 7064aafab9c8614266fcdc8972a45dc83c953f37 Mon Sep 17 00:00:00 2001
From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Mon, 31 Aug 2009 12:41:38 +0000
Subject: [PATCH] Added info about changed leaa0sp and leaaxsp. Rewrote g_leasp
 to cope with 16 stack offsets, because it's rather easy in this case.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4093 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 src/cc65/codegen.c  | 76 ++++++++++++++++++++++++++++++---------------
 src/cc65/codeinfo.c |  3 +-
 src/cc65/coptsize.c | 10 ++++++
 3 files changed, 63 insertions(+), 26 deletions(-)

diff --git a/src/cc65/codegen.c b/src/cc65/codegen.c
index 212a07fb4..6756cf853 100644
--- a/src/cc65/codegen.c
+++ b/src/cc65/codegen.c
@@ -921,38 +921,63 @@ void g_getind (unsigned flags, unsigned offs)
 
 
 
-void g_leasp (int offs)
+void g_leasp (int Offs)
 /* Fetch the address of the specified symbol into the primary register */
 {
+    /* Get low and high byte */
+    unsigned char Lo = (unsigned char) Offs;
+    unsigned char Hi = (unsigned char) (Offs >> 8);
+
     /* Calculate the offset relative to sp */
-    offs -= StackPtr;
+    Offs -= StackPtr;
 
-    /* For value 0 we do direct code */
-    if (offs == 0) {
-        AddCodeLine ("lda sp");
-        AddCodeLine ("ldx sp+1");
-    } else {
-        if (IS_Get (&CodeSizeFactor) < 300) {
-            ldaconst (offs);         		/* Load A with offset value */
-            AddCodeLine ("jsr leaasp");	/* Load effective address */
+    /* Generate code */
+    if (Lo == 0) {
+        if (Hi <= 3) {
+            AddCodeLine ("lda sp");
+            AddCodeLine ("ldx sp+1");
+            while (Hi--) {
+                AddCodeLine ("inx");
+            }
         } else {
+            AddCodeLine ("lda sp+1");
+            AddCodeLine ("clc");
+            AddCodeLine ("adc #$%02X", Hi);
+            AddCodeLine ("tax");
+            AddCodeLine ("lda sp");
+        }
+    } else if (Hi == 0) {
+        /* 8 bit offset */
+        if (IS_Get (&CodeSizeFactor) < 200) {
+            /* 8 bit offset with subroutine call */
+            AddCodeLine ("lda #$%02X", Lo);
+            AddCodeLine ("jsr leaa0sp");
+        } else {
+            /* 8 bit offset inlined */
             unsigned L = GetLocalLabel ();
-            if ((CPUIsets[CPU] & CPU_ISET_65SC02) != 0 && offs == 1) {
-             	AddCodeLine ("lda sp");
-             	AddCodeLine ("ldx sp+1");
-            	AddCodeLine ("ina");
-             	AddCodeLine ("bne %s", LocalLabelName (L));
-             	AddCodeLine ("inx");
-            } else {
-             	ldaconst (offs);
-             	AddCodeLine ("ldx sp+1");
-             	AddCodeLine ("clc");
-             	AddCodeLine ("adc sp");
-             	AddCodeLine ("bcc %s", LocalLabelName (L));
-             	AddCodeLine ("inx");
-            }
+            AddCodeLine ("lda sp");
+            AddCodeLine ("ldx sp+1");
+            AddCodeLine ("clc");
+            AddCodeLine ("adc #$%02X", Lo);
+            AddCodeLine ("bcc %s", LocalLabelName (L));
+            AddCodeLine ("inx");
             g_defcodelabel (L);
         }
+    } else if (IS_Get (&CodeSizeFactor) < 170) {
+        /* Full 16 bit offset with subroutine call */
+        AddCodeLine ("lda #$%02X", Lo);
+        AddCodeLine ("ldx #$%02X", Hi);
+        AddCodeLine ("jsr leaaxsp");
+    } else {
+        /* Full 16 bit offset inlined */
+        AddCodeLine ("lda sp");
+        AddCodeLine ("clc");
+        AddCodeLine ("adc #$%02X", (unsigned char) Offs);
+        AddCodeLine ("pha");
+        AddCodeLine ("lda sp+1");
+        AddCodeLine ("adc #$%02X", (unsigned char) (Offs >> 8));
+        AddCodeLine ("tax");
+        AddCodeLine ("pla");
     }
 }
 
@@ -989,7 +1014,8 @@ void g_leavariadic (int Offs)
         AddCodeLine ("inx");
         g_defcodelabel (L);
     } else {
-        AddCodeLine ("jsr leaasp");
+        AddCodeLine ("ldx #$00");
+        AddCodeLine ("jsr leaaxsp");
     }
 
     /* Add the offset to the primary */
diff --git a/src/cc65/codeinfo.c b/src/cc65/codeinfo.c
index 39f111a3c..50052d59d 100644
--- a/src/cc65/codeinfo.c
+++ b/src/cc65/codeinfo.c
@@ -162,7 +162,8 @@ static const FuncInfo FuncInfoTable[] = {
     { "ldeaxi",         REG_AX,               REG_EAXY | REG_PTR1            },
     { "ldeaxidx",       REG_AXY,              REG_EAXY | REG_PTR1            },
     { "ldeaxysp",       REG_Y,                REG_EAXY                       },
-    { "leaasp",         REG_A,                REG_AX			     },
+    { "leaa0sp",        REG_A,                REG_AX			     },
+    { "leaaxsp",        REG_AX,               REG_AX			     },
     { "lsubeq",         REG_EAXY|REG_PTR1_LO, REG_EAXY | REG_PTR1_HI         },
     { "lsubeq0sp",      REG_EAX,              REG_EAXY                       },
     { "lsubeq1",        REG_Y | REG_PTR1_LO,  REG_EAXY | REG_PTR1_HI         },
diff --git a/src/cc65/coptsize.c b/src/cc65/coptsize.c
index 8957f28c8..c7d8a9bc6 100644
--- a/src/cc65/coptsize.c
+++ b/src/cc65/coptsize.c
@@ -153,6 +153,16 @@ static const CallDesc CallTable [] = {
         },
         F_NONE,
         "ldeax0sp"
+    },{
+        "leaaxsp",
+        {
+            /*     A               X               Y             SRegLo   */
+            UNKNOWN_REGVAL,              0, UNKNOWN_REGVAL, UNKNOWN_REGVAL,
+            /*   SRegHi          Ptr1Lo          Ptr1Hi           Tmp1    */
+            UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL
+        },
+        F_NONE,
+        "leaa0sp"
     },{
         "lsubeq",
         {
-- 
2.39.5