xref: /llvm-project/flang/test/Semantics/modfile50.f90 (revision 950a1618fd6028c76649db1668dc4f97bc69d782)
1! RUN: %python %S/test_modfile.py %s %flang_fc1
2module m1
3  interface foo
4    module procedure foo
5  end interface
6 contains
7  subroutine foo
8  end subroutine
9end module
10module m2
11  use m1, bar => foo
12  interface baz
13    module procedure bar ! must not be replaced in module file with "foo"
14  end interface
15end module
16
17!Expect: m1.mod
18!module m1
19!interface foo
20!procedure::foo
21!end interface
22!contains
23!subroutine foo()
24!end
25!end
26
27!Expect: m2.mod
28!module m2
29!use m1,only:bar=>foo
30!interface baz
31!procedure::bar
32!end interface
33!end
34