(root)/
gcc-13.2.0/
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  }