xref: /llvm-project/flang/test/Semantics/Inputs/getsymbols02-b.f90 (revision bf57fc1c8ea3d8eaf2e9974691012767ac71a73e)

module mm2b
use mm2a
implicit none
private
  public :: callget5
contains
  function callget5() result(ret)
    implicit none
    INTEGER :: ret
    ret = get5()
  end function callget5
end module mm2b