13 lines · plain
1! RUN: %python %S/test_errors.py %s %flang_fc12subroutine s13 implicit none4 !ERROR: IMPLICIT statement after IMPLICIT NONE or IMPLICIT NONE(TYPE) statement5 implicit integer(a-z)6end subroutine7 8subroutine s29 implicit none(type)10 !ERROR: IMPLICIT statement after IMPLICIT NONE or IMPLICIT NONE(TYPE) statement11 implicit integer(a-z)12end subroutine13