! RUN: %python %S/test_modfile.py %s %flang_fc1 | |
! Check modfile generation for external interface | |
module m | |
interface | |
integer function f(x) | |
end function | |
subroutine s(y, z) | |
logical y | |
complex z | |
end subroutine | |
end interface | |
end | |
!Expect: m.mod | |
!module m | |
! interface | |
! function f(x) | |
! real(4)::x | |
! integer(4)::f | |
! end | |
! end interface | |
! interface | |
! subroutine s(y,z) | |
! logical(4)::y | |
! complex(4)::z | |
! end | |
! end interface | |
!end |