1// At one point in development, a typo disabled the remapping of the 2// for iteration variable as private. 3 4// { dg-do compile } 5// { dg-options "-fopenmp -fdump-tree-ompexp" } 6 7extern void bar(int); 8void foo(void) 9{ 10 int i; 11 12#pragma omp parallel for default(none) 13 for (i = 0; i < 10; i++) 14 bar(i); 15} 16 17// { dg-final { scan-tree-dump-times "omp_data_o" 0 "ompexp" } } 18// { dg-final { cleanup-tree-dump "ompexp" } } 19