1 /* { dg-require-effective-target size32plus } */ 2 #define NMAX 3000 3 4 static double a[NMAX][NMAX], b[NMAX][NMAX], c[NMAX][NMAX]; 5 dsyr2k(int N)6void dsyr2k(int N) { 7 int i,j,k; 8 9 #pragma scop 10 for (i=0; i<N; i++) { 11 for (j=0; j<N; j++) { 12 for (k=j; k<N; k++) { 13 c[j][k] += a[i][j] * b[i][k] + b[i][j] * a[i][k]; 14 } 15 } 16 } 17 #pragma endscop 18 } 19 20 /* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" { xfail *-*-* } } } */ 21