1! RUN: %python %S/test_modfile.py %s %flang_fc1 2module m 3 type t1(a, b, c) 4 integer, kind :: a 5 integer(8), len :: b, c 6 integer :: d 7 end type 8 type, extends(t1) :: t2(e) 9 integer, len :: e 10 end type 11 type, extends(t2) :: t3 12 end type 13end 14 15!Expect: m.mod 16!module m 17! type::t1(a,b,c) 18! integer(4),kind::a 19! integer(8),len::b 20! integer(8),len::c 21! integer(4)::d 22! end type 23! type,extends(t1)::t2(e) 24! integer(4),len::e 25! end type 26! type,extends(t2)::t3 27! end type 28!end 29