libgomp/testsuite/libgomp.c/pr66714.c

   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 }