1! RUN: %python %S/test_modfile.py %s %flang_fc1 2module mod0 3 interface proc 4 module procedure proc 5 end interface 6 contains 7 subroutine proc 8 end 9end 10module mod1 11 use mod0,renamed_proc=>proc 12 procedure(renamed_proc),pointer :: p 13end module 14 15!Expect: mod0.mod 16!module mod0 17!interface proc 18!procedure::proc 19!end interface 20!contains 21!subroutine proc() 22!end 23!end 24 25!Expect: mod1.mod 26!module mod1 27!use mod0,only:renamed_proc=>proc 28!procedure(renamed_proc),pointer::p 29!end 30