Sign in
gnu
/
gcc
/
1e819bd95ebeefc1dc469daa1855ce005cb77822
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
goacc
/
fixed-3.f
blob: ede361e8d2e8cdefe5b55261575dfaeaf08b7b86 [
file
] [
log
] [
blame
]
IMPLICIT NONE
INTEGER DEV
!
$ACC PARALLEL
DEV
=
0
!
$ACC
END
PARALLEL
!
$ACC PARALLEL
DEV
=
0
!
$ACC
END
PARALLEL
END