https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88452
--- Comment #2 from jiri.pitt...@jh-inst.cas.cz --- The workaround works only until you try to access the array: subroutine tccdenom(n1,n2) implicit none integer n1, n2,i,j real tt1(n1,n2) complex ctt1(n1,n2) equivalence(tt1, ctt1) do i=1,n1 do j=1,n2 ctt1(i,j)=0 enddo enddo end When compiling this, another ICE occurs: gfortran fi.F fi.F:9:0: ctt1(i,j)=0 internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate.