libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-loop-nest.c

   1 #include <stdlib.h>
   2
   3 #define N 1000
   4
   5 int
   6 main (void)
   7 {
   8   int x[N][N];
   9
  10 #pragma acc kernels copyout (x)
  11   {
  12     for (int ii = 0; ii < N; ii++)
  13       for (int jj = 0; jj < N; jj++)
  14         x[ii][jj] = ii + jj + 3;
  15   }
  16
  17   for (int i = 0; i < N; i++)
  18     for (int j = 0; j < N; j++)
  19       if (x[i][j] != i + j + 3)
  20         abort ();
  21
  22   return 0;
  23 }