Fix ifunc detection in target-supports.exp file.
[official-gcc.git] / libgomp / testsuite / libgomp.fortran / omp_cond1.f
blobf51e868aa385516716add58e94acf21671d2f0fe
1 C Test conditional compilation in fixed form if -fopenmp
2 10 foo = 2
3 &56
4 if (foo.ne.256) call abort
5 bar = 26
6 !$2 0 ba
7 c$ +r = 42
8 !$ bar = 62
9 !$ bar = bar + 1
10 if (bar.ne.43) call abort
11 baz = bar
12 *$ 0baz = 5
13 C$ +12! Comment
14 c$ !4
15 !$ +!Another comment
16 *$ &2
17 !$ X baz = 0 ! Not valid OpenMP conditional compilation lines
18 ! $ baz = 1
19 c$ 10&baz = 2
20 if (baz.ne.51242) call abort
21 end