Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
goacc
/
array-with-dt-2.f90
blob: 807580d75a9c86aa0922a1917d66043b23b4a10e [
file
] [
log
] [
blame
]
type t
integer
,
allocatable
::
A
(:,:)
end
type t
type
(
t
),
allocatable
::
b
(:)
!
$acc update host
(
b
(::
2
))
!
$acc update host
(
b
(
1
)%
A
(::
3
,::
4
))
end