gcc/testsuite/gcc.dg/gomp/for-13.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

// At one point in development, a typo disabled the remapping of the
// for iteration variable as private.

// { dg-do compile }
// { dg-options "-fopenmp -fdump-tree-ompexp" }

extern void bar(int);
void foo(void)
{
  int i;

#pragma omp parallel for default(none)
  for (i = 0; i < 10; i++)
    bar(i);
}

// { dg-final { scan-tree-dump-times "omp_data_o" 0 "ompexp" } }
// { dg-final { cleanup-tree-dump "ompexp" } }