blob: d4e7f4781ae546c863206af3b2b7dca5f16fb562 [file] [log] [blame]
! { dg-do compile }
subroutine s
type t
1 ! { dg-error "Statement label without statement" }
end type
end subroutine