repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
C++: simplify output from suggest_alternatives_for
[official-gcc.git]
/
libgomp
/
testsuite
/
libgomp.fortran
/
omp_cond1.f
blob
f050f5101be4d67945fc4e7578040daf7aa4debd
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
*
$
0
baz
=
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