Sign in
llvm
/
llvm-test-suite
/
refs/heads/main
/
.
/
Fortran
/
gfortran
/
regression
/
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