re PR middle-end/32176 (ICE tree-type mismatch: expected integer_cst, have…

re PR middle-end/32176 (ICE tree-type mismatch: expected integer_cst, have plus_expr in int_cst_value, at tree.c:7720)

	PR middle-end/32176
	* gcc.dg/pr32176.c: New test.


Co-Authored-By: Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>

From-SVN: r126245

gcc/testsuite/ChangeLog

 2007-07-03  Uros Bizjak  <ubizjak@gmail.com>
+	    Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
+
+	PR middle-end/32176
+	* gcc.dg/pr32176.c: New test.
+
+2007-07-03  Uros Bizjak  <ubizjak@gmail.com>
 
 	* gcc.dg/const-float80.c : New test.
 	* gcc.dg/const-float128.c : New test.

gcc/testsuite/gcc.dg/pr32176.c

+/* Contributed by Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>  */
+
+/* { dg-do compile } */
+/* { dg-options "-O2 -fprefetch-loop-arrays" } */
+/* { dg-options "-O2 -fprefetch-loop-arrays -march=i686 -msse" { target { { i?86-*-* x86_64-*-* } && ilp32 } } } */
+
+void foo (void)
+{
+  int i, m;
+  float xa[21];
+
+  m = 0;
+  while (1)
+    {
+      i = 0;
+      while (1)
+	{
+	  if (xa[(long int)i] == xa[(long int)(i+m)])
+	    _gfortran_abort ();
+	  if (i == 10)
+	    break;
+	  i++;
+	}
+      if (m == 10)
+	break;
+      m++;
+    }
+}