Sign in
gnu
/
gcc
/
1f16a020acbea0af26209478990b83b1a1ba3a2b
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
gomp
/
pr80918.f90
blob: 6c5b4d84e8cb7047c0d5fb027d66edbee8eef770 [
file
] [
log
] [
blame
]
!
PR fortran
/
80918
!
{
dg
-
do
compile
}
subroutine foo
(
a
)
integer
::
a
(*)
!
$omp task depend
(
inout
:
a
)
!
$omp
end
task
!
$omp task depend
(
inout
:
a
)
!
$omp
end
task
end
subroutine foo