(record_initial): Reject insns that store into subregs.

From-SVN: r4632

1 files changed, 3 insertions, 1 deletions

diff --git a/gcc/loop.c b/gcc/loop.c
index 357eee6..84a6fdf 100644
--- a/gcc/loop.c
+++ b/gcc/loop.c
@@ -6200,7 +6200,9 @@ record_initial (dest, set)
 
   if (GET_CODE (dest) != REG
       || REGNO (dest) >= max_reg_before_loop
-      || reg_iv_type[REGNO (dest)] != BASIC_INDUCT)
+      || reg_iv_type[REGNO (dest)] != BASIC_INDUCT
+      /* Reject this insn if the source isn't valid for the mode of DEST.  */
+      || GET_MODE (dest) != GET_MODE (SET_DEST (set)))
     return;
 
   bl = reg_biv_class[REGNO (dest)];