PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / graphite / pr42521.c
blob2695df57979ad186b3077708caa03a29b6530a8d
1 /* { dg-options "-O3 -fgraphite-identity" } */
3 extern int *A;
4 extern int B[][4];
6 void foo(int im, int jm, int cond)
8 int i, j;
9 if (cond)
10 for (i = 0; i < 256; i++)
11 A[i] = 0;
13 for (i = 0; i < im; i++)
14 for (j = 1; j < jm; j++)
15 if (jm != 8 || j != jm >> 1)
16 B[j][0] ^= B[j-1][0];