(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
goacc/
kernels-decompose-pr104774-1.c
       1  /* { dg-additional-options "--param openacc-kernels=decompose" } */
       2  
       3  /* { dg-additional-options "-fopt-info-all-omp" } */
       4  
       5  /* { dg-additional-options "--param=openacc-privatization=noisy" }
       6     Prune a few: uninteresting, and potentially varying depending on GCC configuration (data types):
       7     { dg-prune-output {note: variable 'D\.[0-9]+' declared in block isn't candidate for adjusting OpenACC privatization level: not addressable} } */
       8  
       9  int arr_0;
      10  
      11  void
      12  foo (void)
      13  {
      14  #pragma acc kernels /* { dg-line l_compute1 } */
      15    /* { dg-note {OpenACC 'kernels' decomposition: variable 'arr_0' in 'copy' clause requested to be made addressable} {} { target *-*-* } l_compute1 }
      16       { dg-note {variable 'arr_0' made addressable} {} { target *-*-* } l_compute1 } */
      17    /* { dg-note {OpenACC 'kernels' decomposition: variable 'k' declared in block requested to be made addressable} {} { target *-*-* } l_compute1 } */
      18    /* { dg-note {variable 'k' made addressable} {} { target *-*-* } l_compute1 } */
      19    /* { dg-note {variable 'k' declared in block is candidate for adjusting OpenACC privatization level} {} { target *-*-* } l_compute1 } */
      20    /* { dg-note {variable 'arr_0\.0' declared in block isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l_compute1 } */
      21    {
      22      int k;
      23  
      24      /* { dg-note {parallelized loop nest in OpenACC 'kernels' region} {} { target *-*-* } .+1 } */
      25  #pragma acc loop seq /* { dg-line l_loop_k1 } */
      26      /* { dg-note {variable 'k' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l_loop_k1 } */
      27      /* { dg-optimized {assigned OpenACC seq loop parallelism} {} { target *-*-* } l_loop_k1 } */
      28      for (k = 0; k < 2; k++)
      29        arr_0 = k;
      30  
      31      /* { dg-note {parallelized loop nest in OpenACC 'kernels' region} {} { target *-*-* } .+1 } */
      32  #pragma acc loop independent reduction(+: arr_0) /* { dg-line l_loop_k2 } */
      33      /* { dg-note {variable 'k' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l_loop_k2 } */
      34      /* { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l_loop_k2 } */
      35      for (k = 0; k < 2; k++)
      36        arr_0 += k;
      37    }
      38  }