Ifort/ifx ICE with allocate, source and NULL

[Harald1]

The following code crashes ifort/ifx 2021.3:

program p
  real,     pointer :: x, z
  real,     pointer :: y => NULL()
  allocate (x, mold=null(y))   ! no crash
  allocate (z, source=null(y)) ! ICE
end

% ifort ifort-allocate.f90
ifort-allocate.f90(5): catastrophic error: **Internal compiler error: internal abort** Please report this error along with the circumstances in which it occurred in a Software Problem Report.  Note: File and line given may not be explicit cause of this error.
compilation aborted for ifort-allocate.f90 (code 1)

 Commenting out the line with source= avoids the ICE.

Thanks,

Harald

[Barbara_P_Intel]

Thank you for reporting this issue. I filed a bug on your behalf, CMPLRLLVM-30151. I'll let you know when it's fixed.

[Barbara_P_Intel · Accepted solution]

This ICE you reported is fixed in the latest Fortran compilers that are part of oneAPI 2022.3. Please give it a try!

[Harald1]

I can confirm that the ICE is fixed.

Thanks,

Harald