07-30-2021 01:49 PM
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.