Skip gnat.dg/prot7.adb on hppa.
[official-gcc.git] / libgomp / testsuite / libgomp.graphite / force-parallel-7.c
blob9d2b37cbd4beb935f4db35b33a1cac8ea9b5cc3c
1 #define N 500
3 int A[N+5][N+5][N+5];
5 void abort (void);
7 int foo (void)
9 int i, j, k;
11 for (i = 0; i < N + 5; i++)
12 for (j = 0; j < N + 5; j++)
13 for (k = 0; k < N + 5; k++)
14 A[i][j][k] = i + j + k;
16 /* Loop i: carried no dependency. */
17 for (i = 0; i < N; i++)
18 for (j = 0; j < N; j++)
19 for (k = 0; k < N; k++)
20 A[k+1][j+2][i+1] = A[k][j][i+1];
22 return A[1][5][2];
25 int main (void)
27 if (5 != foo ())
28 abort ();
30 return 0;
33 /* Check that parallel code generation part make the right answer. */
34 /* { dg-final { scan-tree-dump-times "5 loops carried no dependency" 1 "graphite" } } */
35 /* { dg-final { scan-tree-dump-times "loopfn.0" 4 "optimized" } } */