24 lines
480 B
C
24 lines
480 B
C
/* PR middle-end/27388 */
|
|
/* { dg-do compile } */
|
|
/* { dg-options "-fopenmp -fdump-tree-omplower" } */
|
|
|
|
extern void bar (int);
|
|
|
|
void
|
|
foo (void)
|
|
{
|
|
int i = 0, j = 0;
|
|
#pragma omp parallel firstprivate (i) private (j)
|
|
{
|
|
#pragma omp for
|
|
for (i = 0; i < 2; i++)
|
|
bar (i);
|
|
#pragma omp for
|
|
for (j = 0; j < 2; j++)
|
|
bar (j);
|
|
}
|
|
}
|
|
|
|
/* { dg-final { scan-tree-dump-times "omp for\[^\\n\]*private" 2 "omplower" } } */
|
|
/* { dg-final { cleanup-tree-dump "omplower" } } */
|