Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/main
/
.
/
test
/
Semantics
/
OpenACC
/
acc-loop-validity.f90
blob: 205e67a4728fcbef16f93a1d516fae417ac1e192 [
file
] [
log
] [
blame
]
!
RUN
:
%
python
%
S
/../
test_errors
.
py
%
s
%
flang
-
fopenacc
program openacc_clause_validity
implicit
none
integer
::
i
,
n
i
=
0
!
ERROR
:
A DO loop must follow the LOOP directive
!
$acc loop
i
=
1
!
$acc loop
do
100
i
=
0
,
n
100
continue
end