/* PR middle-end/27388 */ | |
/* { dg-do compile } */ | |
/* { dg-options "-fopenmp -fdump-tree-omplower" } */ | |
int n, o; | |
void | |
foo (void) | |
{ | |
#pragma omp parallel firstprivate (n) | |
{ | |
int i; | |
#pragma omp parallel for firstprivate (n) | |
for (i = 0; i < 10; i++) | |
++n; | |
#pragma omp atomic | |
o += n; | |
} | |
} | |
/* { dg-final { scan-tree-dump-times "shared\\\(i\\\)" 0 "omplower" } } */ | |
/* { dg-final { scan-tree-dump-times "private\\\(i\\\)" 1 "omplower" } } */ | |
/* { dg-final { cleanup-tree-dump "omplower" } } */ |