1! RUN: %python %S/test_modfile.py %s %flang_fc1 2! Check modfile generation for private type in public API. 3 4module m 5 type, private :: t1 6 integer :: i 7 end type 8 type, private :: t2 9 integer :: i 10 end type 11 type(t1) :: x1 12 type(t2), private :: x2 13end 14 15!Expect: m.mod 16!module m 17!type,private::t1 18!integer(4)::i 19!end type 20!type,private::t2 21!integer(4)::i 22!end type 23!type(t1)::x1 24!type(t2),private::x2 25!end 26