Problem with default structure constructor when used in initialization expression

[Harald]

Hello,

the following code does not compile:

[fortran]program ifort_constructor
  implicit none
  type t
     type(t), pointer :: next(:) => NULL ()
  end type t
  type(t)            :: list  = t()     ! Accepted
  type(t), parameter :: empty = t()     ! Rejected
end program ifort_constructor
[/fortran]

% ifort -stand f03 -standard-semantics -warn all ifort_constructor.f90
ifort_constructor.f90(7): error #8212: Omitted field is not initialized. Field initialization missing: [NEXT]
type(t), parameter :: empty = t() ! Rejected
^
compilation aborted for ifort_constructor.f90 (code 1)


When replacing t() by t(NULL()) in the initialization for empty the code compiles.
Is there a reason why the default constructor does not work, or is it a bug?

[Steven_L_Intel1]

Bug. Escalated as DPD200176794. Thanks.

[Steven_L_Intel1]

This is fixed for a release later this year.