ICE of fortran classic in oneAPI 2021.3

[Jiang__Wei]

------ Build started: Project: 1DPICMCTutorial, Configuration: Debug|x64 ------

Compiling with Intel® Fortran Compiler Classic 2021.3.0 [Intel(R) 64]...
TestICE.f90
D:\Source\Repos\iPM1D2019\1DPICMCTutorial\TestICE.f90(65): 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 D:\Source\Repos\iPM1D2019\1DPICMCTutorial\TestICE.f90 (code 1)

Build log written to "file://D:\Source\Repos\iPM1D2019\1DPICMCTutorial\x64\Debug\BuildLog.htm"
1DPICMCTutorial - 1 error(s), 0 warning(s)

It seems the error is in this subroutine, removing the associate will fix it.

Subroutine UpdateGrid0D1TA0(GD,A0D)
Implicit none
Class(Grid0D1T(*,*)),intent(inout) :: GD
Real(8),intent(in) :: A0D
!Integer(4) :: Ns
Associate(Shift=>GD%Shift,Timer=>GD%Timer,A2D=>GD%Value)

A2D(Shift,Timer)=A0D
Shift=Shift+1

If(Shift==GD%Ns+1) Then
Shift=1
Timer=Timer+1
End If
End Associate
Return
End Subroutine UpdateGrid0D1TA0

[Igor_V_Intel]

This bug is escalated to the development team and should be fixed in the upcoming compiler updates.

[Igor_V_Intel · Accepted solution]

The bug is fixed in the latest version 2021.4.