xref: /llvm-project/flang/test/Semantics/canondo07.f90 (revision 31ad5c14fefa66085eff3629c0cc8393556ba849)
164ab3302SCarolineConcatto! Error test -- DO loop uses obsolete loop termination statement
264ab3302SCarolineConcatto! See R1131 and C1131
364ab3302SCarolineConcatto
4*31ad5c14SArnamoy Bhattacharyya! RUN: %flang_fc1 -fdebug-unparse-with-symbols -pedantic %s 2>&1 | FileCheck %s
564ab3302SCarolineConcatto! CHECK: A DO loop should terminate with an END DO or CONTINUE
664ab3302SCarolineConcatto
764ab3302SCarolineConcattoprogram endDo
864ab3302SCarolineConcatto  do 10 i = 1, 5
964ab3302SCarolineConcatto10  print *, "in loop"
1064ab3302SCarolineConcattoend program endDo
11