C++: simplify output from suggest_alternatives_for
[official-gcc.git] / libgomp / testsuite / libgomp.fortran / omp_cond1.f
blobf050f5101be4d67945fc4e7578040daf7aa4debd
1 C Test conditional compilation in fixed form if -fopenmp
2 10 foo = 2
3 &56
4 if (foo.ne.256) STOP 1
5 bar = 26
6 !$2 0 ba
7 c$ +r = 42
8 !$ bar = 62
9 !$ bar = bar + 1
10 if (bar.ne.43) STOP 2
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) STOP 3
21 end