1! { dg-do compile }
2! { dg-options "-fopenmp -fdump-tree-omplower" }
3  !$omp  parallel
4call bar
5	!$omp end parallel
6  !$omp 	 	p&
7!$omp&arallel
8call bar
9!$omp e&
10!$omp&ndparallel
11!$omp  &
12!$omp  &  &
13!$omp pa&
14!$omp rallel
15call bar
16!$omp end parallel
17end
18
19! { dg-final { scan-tree-dump-times "pragma omp parallel" 3 "omplower" } }
20