Add support for ARMv8-R architecture
[official-gcc.git] / libgomp / testsuite / libgomp.fortran / omp_cond3.F90
blob6c4e36e2293d55a9305e8feac521923429842a10
1 ! Test conditional compilation in free form if -fopenmp
2 ! { dg-options "-fopenmp" }
3    10 foo = 2&
4   &56
5   if (foo.ne.256) call abort
6   bar = 26
7    !$  20 ba&
8 !$   &r = 4&
9   !$2
10       !$bar = 62
11    !$ bar = bar + 2
12 #ifdef _OPENMP
13 bar = bar - 1
14 #endif
15   if (bar.ne.43) call abort
16       baz = bar
17 !$ 30 baz = 5&     ! Comment
18 !$12  &  
19   !$ + 2
20 !$X baz = 0 ! Not valid OpenMP conditional compilation lines
21 ! $   baz = 1
22 baz = baz + 1 !$ baz = 2
23       if (baz.ne.515) call abort
24       end