repo.or.cz
/
llvm-project.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
[LoopReroll] Add an extra defensive check to avoid SCEV assertion.
[llvm-project.git]
/
flang
/
test
/
Semantics
/
dosemantics07.f90
blob
be1bb9f77052429af617fb7d74369f40a4f3ced8
1
! RUN: %S/test_errors.sh %s %t %flang_fc1
2
! REQUIRES: shell
3
!C1132
4
! If the do-stmt is a nonlabel-do-stmt, the corresponding end-do shall be an
5
! end-do-stmt.
6
subroutine
s1
()
7
do while
(.
true
.)
8
print
*,
"Hello"
9
continue
10
!ERROR: expected 'END DO'
11
end subroutine
s1