1  /* { dg-do "compile" } */
       2  /* { dg-additional-options "--param ggc-min-expand=0" } */
       3  /* { dg-additional-options "--param ggc-min-heapsize=0" } */
       4  /* { dg-additional-options "-g" } */
       5  
       6  /* Minimized from on target-2.c.  */
       7  
       8  void
       9  fn3 (int x)
      10  {
      11    double b[3 * x];
      12    int i;
      13  #pragma omp target
      14  #pragma omp parallel for
      15    for (i = 0; i < x; i++)
      16      b[i] += 1;
      17  }