URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [pr27388-3.c] - Rev 689
Compare with Previous | Blame | View Log
/* 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" } } */