flang/test/Semantics/label09.f90 - llvm-project - Git at Google

 ! RUN: %S/test_any.sh %s %flang %t
 ! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
 ! CHECK: Label '60' was not found

 subroutine s(a)
   real a(10)
   write(*,60) "Hi there"
 end subroutine s
	! RUN: %S/test_any.sh %s %flang %t
	! EXEC: ${F18} -funparse-with-symbols %s 2>&1 \| ${FileCheck} %s
	! CHECK: Label '60' was not found

	subroutine s(a)
	real a(10)
	write(*,60) "Hi there"
	end subroutine s