1  /* { dg-additional-options "-fdump-tree-gimple" } */
       2  
       3  void
       4  subr (int *a)
       5  {
       6  #pragma acc data deviceptr (a)
       7  #pragma acc parallel
       8    a[0] += 1.0;
       9  }
      10  
      11  /* { dg-final { scan-tree-dump-times "#pragma omp target oacc_parallel.*map\\(tofrom:a" 1 "gimple" } } */