45 lines · plain
1! RUN: %python %S/test_modfile.py %s %flang_fc12module m13 type foo4 end type5 interface foo6 end interface7end8 9!Expect: m1.mod10!module m111!type::foo12!end type13!interface foo14!end interface15!end16 17module m218 use m1, only: bar => foo19end20 21!Expect: m2.mod22!module m223!use m1,only:bar=>foo24!use m1,only:bar=>foo25!interface bar26!end interface27!end28 29module m330 contains31 subroutine sub(x)32 use m233 type(bar) x34 end35end36 37!Expect: m3.mod38!module m339!contains40!subroutine sub(x)41!use m2,only:bar42!type(bar)::x43!end44!end45