Sign in
gnu
/
gcc
/
069f46c71e9432eda3d48a366e5c2a750cf8d612
/
.
/
libgomp
/
testsuite
/
libgomp.oacc-fortran
/
pr84955.f90
blob: dc858653808b0a0425ffa00a03d21c7e9bf1e82a [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
subroutine s
integer
::
i
,
j
!
$acc parallel loop tile
(
2
,
3
)
do
i
=
1
,
10
do
j
=
1
,
10
do
end
do
end
do
end
do
!
$acc
end
parallel loop
end
subroutine s