! PR15365
! Default initializers were being missed
program main
  type xyz
     integer :: x = 123
  end type xyz
  type (xyz) :: a  !! ok
  type (xyz) b    !!! not initialized !!!
  if (a%x.ne.123) STOP 1
  if (b%x.ne.123) STOP 2
end
! PR15365
! Default initializers were being missed
program main
  type xyz
     integer :: x = 123
  end type xyz
  type (xyz) :: a  !! ok
  type (xyz) b    !!! not initialized !!!
  if (a%x.ne.123) STOP 1
  if (b%x.ne.123) STOP 2
end