From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Wed, 11 Jul 2012 20:58:29 +0000 (+0000)
Subject: Enable optimization for arithmetic right shift. NOTE: There's a bug lingering
X-Git-Tag: V2.14~291
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=44f965c462cd641be5cf2a31e2584e1764286463;p=cc65

Enable optimization for arithmetic right shift. NOTE: There's a bug lingering
in the shift code optimization which needs fixing.


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

diff --git a/src/cc65/coptstop.c b/src/cc65/coptstop.c
index fb3e753bc..4cd577879 100644
--- a/src/cc65/coptstop.c
+++ b/src/cc65/coptstop.c
@@ -840,7 +840,7 @@ static unsigned Opt_tosshift (StackOpData* D, const char* Name)
     /* Store the value into the zeropage instead of pushing it */
     ReplacePushByStore (D);
 
-    /* Inline the compare */
+    /* Inline the shift */
     D->IP = D->OpIndex+1;
 
     /* tay */
@@ -1645,10 +1645,7 @@ static const OptFuncDesc FuncTable[] = {
     { "tosaddax",   Opt_tosaddax,  REG_NONE, OP_NONE                    },
     { "tosandax",   Opt_tosandax,  REG_NONE, OP_NONE                    },
     { "tosaslax",   Opt_tosaslax,  REG_NONE, OP_NONE                    },
-#if 0
-    /* Library routine missing */
     { "tosasrax",   Opt_tosasrax,  REG_NONE, OP_NONE                    },
-#endif
     { "toseqax",    Opt_toseqax,   REG_NONE, OP_NONE                    },
     { "tosgeax",    Opt_tosgeax,   REG_NONE, OP_RHS_LOAD_DIRECT         },
     { "tosltax",    Opt_tosltax,   REG_NONE, OP_RHS_LOAD_DIRECT         },