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
match: Optimize `max(a,b) == 0` to `(a|b) == 0` for unsigned [PR115275]
[official-gcc.git]
/
libgomp
/
testsuite
/
libgomp.fortran
/
omp_cond2.f
blob
e54edeaf55e880b289161a6dac44f1c825add963
1
c Test conditional compilation in fixed form if -fno-openmp
2
! {
dg
-
options
"-fno-openmp"
}
3
10
foo
=
2
4
&
56
5
if
(
foo
.
ne
.256
)
stop
1
6
bar
=
26
7
!
$
2 0
ba
8
c$ +r = 42
9
!
$ bar
=
62
10
!
$ bar
=
bar
+
1
11
if
(
bar
.
ne
.26
)
stop
2
12
baz
=
bar
13
*
$
0
baz
=
5
14
C$ +12! Comment
15
c$ !4
16
!
$
+!
Another comment
17
*
$
&
2
18
!
$ X baz
=
0
!
Not valid OpenMP conditional compilation lines
19
!
$ baz
=
1
20
c$ 10&baz = 2
21
if
(
baz
.
ne
.26
)
stop
3
22
end