2014-08-04 Ed Schonberg <schonberg@adacore.com>
[official-gcc.git] / gcc / testsuite / gcc.dg / pr32176.c
blob3017c34e3c64ed23fb4f71f2c88de6834d9e5ab0
1 /* Contributed by Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> */
3 /* { dg-do compile } */
4 /* { dg-options "-O2 -fprefetch-loop-arrays -w" } */
5 /* { dg-options "-O2 -fprefetch-loop-arrays -march=i686 -msse" { target { { i?86-*-* x86_64-*-* } && ia32 } } } */
7 void foo (void)
9 int i, m;
10 float xa[21];
12 m = 0;
13 while (1)
15 i = 0;
16 while (1)
18 if (xa[(long int)i] == xa[(long int)(i+m)])
19 _gfortran_abort ();
20 if (i == 10)
21 break;
22 i++;
24 if (m == 10)
25 break;
26 m++;