19 lines
417 B
C
19 lines
417 B
C
// 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-lower" }
|
|
|
|
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 "lower" } }
|
|
// { dg-final { cleanup-tree-dump "lower" } }
|