OSDN Git Service

Fix PR32824.
[pf3gnuchains/gcc-fork.git] / gcc / regmove.c
index 3341d3f..3e1bf40 100644 (file)
@@ -27,10 +27,11 @@ along with GCC; see the file COPYING3.  If not see
 #include "system.h"
 #include "coretypes.h"
 #include "tm.h"
-#include "rtl.h" /* stdio.h must precede rtl.h for FFS.  */
+#include "rtl.h"
 #include "tm_p.h"
 #include "insn-config.h"
 #include "recog.h"
+#include "target.h"
 #include "output.h"
 #include "regs.h"
 #include "hard-reg-set.h"
@@ -44,6 +45,7 @@ along with GCC; see the file COPYING3.  If not see
 #include "timevar.h"
 #include "tree-pass.h"
 #include "df.h"
+#include "ira.h"
 
 static int optimize_reg_copy_1 (rtx, rtx, rtx);
 static void optimize_reg_copy_2 (rtx, rtx, rtx);
@@ -184,7 +186,9 @@ try_auto_increment (rtx insn, rtx inc_insn, rtx inc_insn_set, rtx reg,
                   &SET_SRC (inc_insn_set),
                   XEXP (SET_SRC (inc_insn_set), 0), 1);
              validate_change (insn, &XEXP (use, 0),
-                              gen_rtx_fmt_e (inc_code, Pmode, reg), 1);
+                              gen_rtx_fmt_e (inc_code,
+                                             GET_MODE (XEXP (use, 0)), reg),
+                              1);
              if (apply_change_group ())
                {
                  /* If there is a REG_DEAD note on this insn, we must
@@ -236,7 +240,7 @@ optimize_reg_copy_1 (rtx insn, rtx dest, rtx src)
 
   /* We don't want to mess with hard regs if register classes are small.  */
   if (sregno == dregno
-      || (SMALL_REGISTER_CLASSES
+      || (targetm.small_register_classes_for_mode_p (GET_MODE (src))
          && (sregno < FIRST_PSEUDO_REGISTER
              || dregno < FIRST_PSEUDO_REGISTER))
       /* We don't see all updates to SP if they are in an auto-inc memory
@@ -303,7 +307,7 @@ optimize_reg_copy_1 (rtx insn, rtx dest, rtx src)
                  if (sregno < FIRST_PSEUDO_REGISTER
                      && reg_mentioned_p (dest, PATTERN (q)))
                    failed = 1;
-                 
+
                  /* Attempt to replace all uses.  */
                  else if (!validate_replace_rtx (src, dest, q))
                    failed = 1;
@@ -321,9 +325,12 @@ optimize_reg_copy_1 (rtx insn, rtx dest, rtx src)
              /* For SREGNO, count the total number of insns scanned.
                 For DREGNO, count the total number of insns scanned after
                 passing the death note for DREGNO.  */
-             s_length++;
-             if (dest_death)
-               d_length++;
+             if (!DEBUG_INSN_P (p))
+               {
+                 s_length++;
+                 if (dest_death)
+                   d_length++;
+               }
 
              /* If the insn in which SRC dies is a CALL_INSN, don't count it
                 as a call that has been crossed.  Otherwise, count it.  */
@@ -521,7 +528,7 @@ optimize_reg_copy_3 (rtx insn, rtx dest, rtx src)
   for (p = PREV_INSN (insn); p && ! reg_set_p (src_reg, p); p = PREV_INSN (p))
     if (INSN_P (p) && BLOCK_FOR_INSN (p) != bb)
       break;
-  
+
   if (! p || BLOCK_FOR_INSN (p) != bb)
     return;
 
@@ -599,8 +606,6 @@ copy_src_to_dest (rtx insn, rtx src, rtx dest)
   rtx *p_move_notes;
   int src_regno;
   int dest_regno;
-  int insn_uid;
-  int move_uid;
 
   /* A REG_LIVE_LENGTH of -1 indicates the register is equivalent to a constant
      or memory location and is used infrequently; a REG_LIVE_LENGTH of -2 is
@@ -656,9 +661,6 @@ copy_src_to_dest (rtx insn, rtx src, rtx dest)
       *p_move_notes = NULL_RTX;
       *p_insn_notes = NULL_RTX;
 
-      insn_uid = INSN_UID (insn);
-      move_uid = INSN_UID (move_insn);
-
       /* Update the various register tables.  */
       dest_regno = REGNO (dest);
       INC_REG_N_SETS (dest_regno, 1);
@@ -767,7 +769,7 @@ fixup_match_2 (rtx insn, rtx dst, rtx src, rtx offset)
 
       if (find_regno_note (p, REG_DEAD, REGNO (dst)))
        dst_death = p;
-      if (! dst_death)
+      if (! dst_death && !DEBUG_INSN_P (p))
        length++;
 
       pset = single_set (p);
@@ -927,7 +929,7 @@ regmove_backward_pass (void)
   FOR_EACH_BB_REVERSE (bb)
     {
       /* ??? Use the safe iterator because fixup_match_2 can remove
-            insns via try_auto_increment.  */ 
+            insns via try_auto_increment.  */
       FOR_BB_INSNS_REVERSE_SAFE (bb, insn, prev)
        {
          struct match match;
@@ -1095,7 +1097,8 @@ regmove_backward_pass (void)
                  if (BLOCK_FOR_INSN (p) != bb)
                    break;
 
-                 length++;
+                 if (!DEBUG_INSN_P (p))
+                   length++;
 
                  /* ??? See if all of SRC is set in P.  This test is much
                     more conservative than it needs to be.  */
@@ -1103,35 +1106,41 @@ regmove_backward_pass (void)
                  if (pset && SET_DEST (pset) == src)
                    {
                      /* We use validate_replace_rtx, in case there
-                        are multiple identical source operands.  All of
-                        them have to be changed at the same time.  */
+                        are multiple identical source operands.  All
+                        of them have to be changed at the same time:
+                        when validate_replace_rtx() calls
+                        apply_change_group().  */
+                     validate_change (p, &SET_DEST (pset), dst, 1);
                      if (validate_replace_rtx (src, dst, insn))
-                       {
-                         if (validate_change (p, &SET_DEST (pset),
-                                              dst, 0))
-                           success = 1;
-                         else
-                           {
-                             /* Change all source operands back.
-                                This modifies the dst as a side-effect.  */
-                             validate_replace_rtx (dst, src, insn);
-                             /* Now make sure the dst is right.  */
-                             validate_change (insn,
-                                              recog_data.operand_loc[match_no],
-                                              dst, 0);
-                           }
-                       }
+                       success = 1;
                      break;
                    }
 
-                 /* We can't make this change if SRC is read or
+                 /* We can't make this change if DST is mentioned at
+                    all in P, since we are going to change its value.
+                    We can't make this change if SRC is read or
                     partially written in P, since we are going to
-                    eliminate SRC. We can't make this change 
-                    if DST is mentioned at all in P,
-                    since we are going to change its value.  */
-                 if (reg_overlap_mentioned_p (src, PATTERN (p))
-                     || reg_mentioned_p (dst, PATTERN (p)))
-                   break;
+                    eliminate SRC.  However, if it's a debug insn, we
+                    can't refrain from making the change, for this
+                    would cause codegen differences, so instead we
+                    invalidate debug expressions that reference DST,
+                    and adjust references to SRC in them so that they
+                    become references to DST.  */
+                 if (reg_mentioned_p (dst, PATTERN (p)))
+                   {
+                     if (DEBUG_INSN_P (p))
+                       validate_change (p, &INSN_VAR_LOCATION_LOC (p),
+                                        gen_rtx_UNKNOWN_VAR_LOC (), 1);
+                     else
+                       break;
+                   }
+                 if (reg_overlap_mentioned_p (src, PATTERN (p)))
+                   {
+                     if (DEBUG_INSN_P (p))
+                       validate_replace_rtx_group (src, dst, p);
+                     else
+                       break;
+                   }
 
                  /* If we have passed a call instruction, and the
                     pseudo-reg DST is not already live across a call,
@@ -1193,6 +1202,8 @@ regmove_backward_pass (void)
 
                  break;
                }
+             else if (num_changes_pending () > 0)
+               cancel_changes (0);
            }
 
          /* If we weren't able to replace any of the alternatives, try an
@@ -1214,6 +1225,9 @@ regmove_optimize (void)
   df_note_add_problem ();
   df_analyze ();
 
+  if (flag_ira_loop_pressure)
+    ira_set_pseudo_classes (dump_file);
+
   regstat_init_n_sets_and_refs ();
   regstat_compute_ri ();
 
@@ -1236,6 +1250,8 @@ regmove_optimize (void)
     }
   regstat_free_n_sets_and_refs ();
   regstat_free_ri ();
+  if (flag_ira_loop_pressure)
+    free_reg_info ();
   return 0;
 }