1  /* { dg-additional-options "--param openacc-kernels=decompose" } */
       2  
       3  /* Ensure consistent diagnostics, regardless of checking level:
       4     { dg-additional-options -Wfatal-errors }
       5     { dg-message {terminated due to -Wfatal-errors} TODO { target *-*-* } 0 } */
       6  
       7  /* { dg-additional-options "-g" } */
       8  /* { dg-additional-options "-O1" } so that we may get some 'GIMPLE_DEBUG's.  */
       9  
      10  /* { dg-additional-options "-fopt-info-all-omp" } */
      11  
      12  /* { dg-additional-options "--param=openacc-privatization=noisy" } */
      13  
      14  int *p;
      15  
      16  void
      17  foo (void)
      18  {
      19    /* { dg-bogus {sorry, unimplemented: 'gimple_debug' not yet supported} TODO { xfail *-*-* } .+1 } */
      20  #pragma acc kernels /* { dg-line l_compute1 } */
      21    /* { dg-note {OpenACC 'kernels' decomposition: variable 'p' in 'copy' clause requested to be made addressable} {} { target *-*-* } l_compute1 }
      22       { dg-note {variable 'p' made addressable} {} { xfail *-*-* } l_compute1 } */
      23    /* { dg-note {variable 'c' declared in block is candidate for adjusting OpenACC privatization level} {} { xfail *-*-* } l_compute1 } */
      24    /* { dg-note {variable 'c\.0' declared in block isn't candidate for adjusting OpenACC privatization level: not addressable} {} { xfail *-*-* } l_compute1 } */
      25    {
      26      int c;
      27  
      28      /* { dg-note {beginning 'gang-single' part in OpenACC 'kernels' region} {} { xfail *-*-* } .+1 } */
      29      p = &c;
      30  
      31      /* { dg-note {parallelized loop nest in OpenACC 'kernels' region} {} { xfail *-*-* } .+1 } */
      32  #pragma acc loop independent /* { dg-line l_loop_c1 } */
      33      /* { dg-note {variable 'c\.0' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { xfail *-*-* } l_loop_c1 } */
      34      /* { dg-note {variable 'c' in 'private' clause is candidate for adjusting OpenACC privatization level} {} { xfail *-*-* } l_loop_c1 }
      35         { dg-note {variable 'c' ought to be adjusted for OpenACC privatization level: 'vector'} {} { xfail *-*-* } l_loop_c1 } */
      36      /* { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { xfail *-*-* } l_loop_c1 } */
      37      for (c = 0; c < 1; ++c)
      38        ;
      39    }
      40  }