OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
* testsuite/libgomp.exp (libgomp_init): Only set things that
[pf3gnuchains/gcc-fork.git]
/
libgomp
/
testsuite
/
libgomp.fortran
/
omp_cond1.f
1
C Test conditional compilation in fixed form if -fopenmp
2
! { dg-options "-fopenmp" }
3
10 foo = 2
4
&56
5
if (foo.ne.256) call abort
6
bar = 26
7
!$2 0 ba
8
c$ +r = 42
9
!$ bar = 62
10
!$ bar = bar + 1
11
if (bar.ne.43) call abort
12
baz = bar
13
*$ 0baz = 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.51242) call abort
22
end