PR fortran/3924
authorrth <rth@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 17 Sep 2002 06:05:53 +0000 (06:05 +0000)
committerrth <rth@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 17 Sep 2002 06:05:53 +0000 (06:05 +0000)
        * sdbout.c (sdbout_symbol): Don't handle offsets from a symbol.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@57232 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ChangeLog
gcc/sdbout.c

index 0a5248f..8b1d3de 100644 (file)
@@ -1,5 +1,10 @@
 2002-09-16  Richard Henderson  <rth@redhat.com>
 
+       PR fortran/3924
+        * sdbout.c (sdbout_symbol): Don't handle offsets from a symbol.
+
+2002-09-16  Richard Henderson  <rth@redhat.com>
+
        * emit-rtl.c (set_mem_attributes_minus_bitpos): Adjust SIZE
        as well as OFFSET for BITPOS.
 
index 9effe78..9d5effd 100644 (file)
@@ -924,23 +924,6 @@ sdbout_symbol (decl, local)
          PUT_SDB_INT_VAL (DEBUGGER_AUTO_OFFSET (XEXP (value, 0)));
          PUT_SDB_SCL (C_AUTO);
        }
-      else if (GET_CODE (value) == MEM && GET_CODE (XEXP (value, 0)) == CONST)
-       {
-         /* Handle an obscure case which can arise when optimizing and
-            when there are few available registers.  (This is *always*
-            the case for i386/i486 targets).  The DECL_RTL looks like
-            (MEM (CONST ...)) even though this variable is a local `auto'
-            or a local `register' variable.  In effect, what has happened
-            is that the reload pass has seen that all assignments and
-            references for one such a local variable can be replaced by
-            equivalent assignments and references to some static storage
-            variable, thereby avoiding the need for a register.  In such
-            cases we're forced to lie to debuggers and tell them that
-            this variable was itself `static'.  */
-         PUT_SDB_DEF (name);
-         PUT_SDB_VAL (XEXP (XEXP (value, 0), 0));
-         PUT_SDB_SCL (C_STAT);
-       }
       else
        {
          /* It is something we don't know how to represent for SDB.  */