Sign in
gnu
/
gcc
/
1e819bd95ebeefc1dc469daa1855ce005cb77822
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
goacc
/
pr85879.f90
blob: cd50be2fdb47af16934b3db8db1f06c14d36f762 [
file
] [
log
] [
blame
]
!
PR middle
-
end
/
85879
!
{
dg
-
do
compile
}
program p
integer
,
pointer
::
i
integer
,
target
::
j
j
=
2
i
=>
j
!
$acc parallel
j
=
i
!
$acc
end
parallel
end