From: kvigor <kvigor@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Wed, 18 Oct 2000 17:59:01 +0000 (+0000)
Subject: disable packRegsForOneuse until I can make it safe
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=3ef7afa41c7b0301065eb1b66942efce3f09bfa8;p=fw%2Fsdcc

disable packRegsForOneuse until I can make it safe


git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@476 4a8a32a2-be11-0410-ad9d-d568d2c75423
---

diff --git a/src/ds390/gen.c b/src/ds390/gen.c
index 7d3ccf89..bc8cd0a2 100644
--- a/src/ds390/gen.c
+++ b/src/ds390/gen.c
@@ -712,6 +712,15 @@ static void aopOp (operand *op, iCode *ic, bool result, bool useDP2)
 
         if (sym->ruonly ) {
             int i;
+            
+            if (useDP2)
+            {
+                /* a AOP_STR uses DPTR, but DPTR is already in use; 
+                 * we're just hosed.
+                 */
+                fprintf(stderr, "*** Internal error: AOP_STR with DPTR in use!\n");
+            }
+            
             aop = op->aop = sym->aop = newAsmop(AOP_STR);
             aop->size = getSize(sym->type);
             for ( i = 0 ; i < fReturnSize_390 ; i++ )
diff --git a/src/ds390/ralloc.c b/src/ds390/ralloc.c
index 9d12c973..96da72af 100644
--- a/src/ds390/ralloc.c
+++ b/src/ds390/ralloc.c
@@ -1720,6 +1720,14 @@ static int packRegsForSupport (iCode *ic, eBBlock *ebp)
 /*-----------------------------------------------------------------*/
 static iCode *packRegsForOneuse (iCode *ic, operand *op , eBBlock *ebp)
 {
+#if 1
+    
+    /* I can't figure out how to make this safe yet. */
+    ic; op; ebp;
+    return NULL;
+    
+    
+#else
     bitVect *uses ;
     iCode *dic, *sic;
 
@@ -1836,7 +1844,7 @@ static iCode *packRegsForOneuse (iCode *ic, operand *op , eBBlock *ebp)
 	        
     OP_SYMBOL(op)->ruonly = 1;
     return sic;
-	
+#endif	
 }
 
 /*-----------------------------------------------------------------*/