1  /* { dg-additional-options "--param openacc-kernels=decompose" } */
       2  
       3  /* { dg-additional-options "-fchecking" }
       4     { dg-ice TODO { c++ } }
       5     { dg-prune-output "during GIMPLE pass: omp_oacc_kernels_decompose" } */
       6  
       7  /* { dg-additional-options "-fcompare-debug" } -- w/o debug compiled first.
       8     { dg-bogus {error: during '-fcompare-debug' recompilation} TODO { xfail c++ } 0 }
       9     { dg-bogus {error: [^\n\r]+: '-fcompare-debug' failure \(length\)} TODO { xfail c++ } 0 } */
      10  /* { dg-additional-options "-O1" } so that we may get some 'GIMPLE_DEBUG's.  */
      11  
      12  /* { dg-additional-options "-fopt-info-all-omp" } */
      13  
      14  /* { dg-additional-options "--param=openacc-privatization=noisy" } */
      15  
      16  int *p;
      17  
      18  void
      19  foo (void)
      20  {
      21    /* { dg-bogus {sorry, unimplemented: 'gimple_debug' not yet supported} {} { target *-*-* } .+1 } suppressed via '-fcompare-debug'.  */
      22  #pragma acc kernels /* { dg-line l_compute1 } */
      23    /* { dg-note {OpenACC 'kernels' decomposition: variable 'p' in 'copy' clause requested to be made addressable} {} { target *-*-* } l_compute1 }
      24       { dg-note {variable 'p' made addressable} {} { target *-*-* } l_compute1 } */
      25    /* { dg-note {variable 'c' declared in block is candidate for adjusting OpenACC privatization level} {} { target *-*-* } l_compute1 } */
      26    /* { dg-note {variable 'c\.0' declared in block isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l_compute1 } */
      27    {
      28      /* { dg-bogus {note: beginning 'gang-single' part in OpenACC 'kernels' region} {w/ debug} { xfail c++ } .-1 }
      29         { dg-bogus {note: beginning 'gang-single' part in OpenACC 'kernels' region} {w/ debug} { xfail c } .+1 } */
      30      int c;
      31  
      32      /* { dg-note {beginning 'gang-single' part in OpenACC 'kernels' region} {} { target *-*-* } .+1 } */
      33      p = &c;
      34  
      35      /* { dg-note {parallelized loop nest in OpenACC 'kernels' region} {} { target *-*-* } .+1 } */
      36  #pragma acc loop independent /* { dg-line l_loop_c1 } */
      37      /* { dg-note {variable 'c\.0' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l_loop_c1 } */
      38      /* { dg-note {variable 'c' in 'private' clause is candidate for adjusting OpenACC privatization level} {} { target *-*-* } l_loop_c1 }
      39         { dg-note {variable 'c' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l_loop_c1 } */
      40      /* { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l_loop_c1 } */
      41      for (c = 0; c < 1; ++c)
      42        ;
      43    }
      44  }