OSDN Git Service

2007-02-21 Bernhard Fischer <aldot@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / gomp / omp_parse2.f
1 c { dg-do compile }
2 c { dg-options "-fopenmp -fdump-tree-omplower" }
3 !$omp  parallel
4       call bar
5 c$omp   end parallel
6 C$omp           p
7 *$omp+arallel
8       call bar
9 !$omp e
10 !$omp+ndparallel
11       end
12
13 ! { dg-final { scan-tree-dump-times "pragma omp parallel" 2 "omplower" } }
14 ! { dg-final { cleanup-tree-dump "omplower" } }