! RUN: %python %S/test_modfile.py %s %flang_fc1 ! Ensures that uninitialized allocatable components in a structure constructor ! appear with explicit NULL() in the expression representation. module m type t real, allocatable :: x1, x2, x3 end type type t2 type(t) :: a = t(NULL(),x2=NULL()) end type end module !Expect: m.mod !module m !type::t !real(4),allocatable::x1 !real(4),allocatable::x2 !real(4),allocatable::x3 !end type !type::t2 !type(t)::a=t(x1=NULL(),x2=NULL(),x3=NULL()) !end type !intrinsic::null !end