* function.c (fixup_var_refs_insns): Handle CLOBBER of a CONCAT.

From-SVN: r21298

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index ebbb1bdd39f670cc73ae78de75e3a7df7de974a2..8f94ec1d9d5410295b137497563c8dfd944221a3 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+Mon Jul 20 01:13:19 1998  Jim Wilson  <wilson@cygnus.com>
+
+       * function.c (fixup_var_refs_insns): Handle CLOBBER of a CONCAT.
+
 Sat Jul 18 15:20:19 1998  Mark Mitchell  <mark@markmitchell.com>
 
        * loop.c (maybe_eliminate_biv_1): Avoid signed/unsigned comparison

diff --git a/gcc/function.c b/gcc/function.c
index 67bbc698cfe8473a4faaab5feb2eff900a24e234..cf9542bfe9bc7ae6e87ea2e480c1428a8d044512 100644 (file)
--- a/gcc/function.c
+++ b/gcc/function.c
@@ -1661,7 +1661,10 @@ fixup_var_refs_insns (var, promoted_mode, unsignedp, insn, toplevel)
             If it has a REG_LIBCALL note, delete the REG_LIBCALL
             and REG_RETVAL notes too.  */
          if (GET_CODE (PATTERN (insn)) == CLOBBER
-             && XEXP (PATTERN (insn), 0) == var)
+             && (XEXP (PATTERN (insn), 0) == var
+                 || (GET_CODE (XEXP (PATTERN (insn), 0)) == CONCAT
+                     && (XEXP (XEXP (PATTERN (insn), 0), 0) == var
+                         || XEXP (XEXP (PATTERN (insn), 0), 1) == var))))
            {
              if ((note = find_reg_note (insn, REG_LIBCALL, NULL_RTX)) != 0)
                /* The REG_LIBCALL note will go away since we are going to