! RUN: %python %S/test_modfile.py %s %flang_fc1 ! Ensure that a dummy procedure's interface's imports ! appear in the module file. module m type :: t end type contains subroutine s1(s2) interface subroutine s2(x) import class(t) :: x end subroutine end interface end subroutine end module !Expect: m.mod !module m !type::t !end type !contains !subroutine s1(s2) !interface !subroutine s2(x) !import::t !class(t)::x !end !end interface !end !end