blob: b64659ae6c2913edf797601788cced65137e4e85 [file] [log] [blame]
! RUN: %python %S/test_errors.py %s %flang_fc1
!C1132
! If the do-stmt is a nonlabel-do-stmt, the corresponding end-do shall be an
! end-do-stmt.
subroutine s1()
do while (.true.)
print *, "Hello"
continue
!ERROR: expected 'END DO'
end subroutine s1