internal compiler error when initializing

Harper__John — Wed, 12 Dec 2018 00:35:37 GMT

This program produced the error message below it when compiled with ifort 17.0-1589

module qpcomplex
implicit none
integer,parameter :: qp = selected_real_kind(30)
real(qp),parameter:: two = 2
complex(qp),parameter:: qpi = cmplx(0,1,kind=qp)
end module qpcomplex

program prog
use qpcomplex, only: qp,qpi,two
implicit none
integer:: j,n
complex(qp):: z,zseries(30) = [(cmplx(n,0,qp)/two,n=1,10),&
       (-1.4_qp+qpi*j/two,j=0,9), (1.4_qp-qpi*j/two,j=0,9)]
do j = 1,size(zseries)
     z = zseries(j)
     print "(SP,A,F37.33,A,F37.33,A)", '(',real(z),',',aimag(z),')'
end do
end program prog

Intel(R) Fortran 17.0-1589
iforttest2.f90(13): error #6973: This is not a valid initialization expression.
(-1.4_qp+qpi*j/two,j=0,9), (1.4_qp-qpi*j/two,j=0,9)]
---------------^
iforttest2.f90: catastrophic error: **Internal compiler error: segmentation violation signal raised** 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 iforttest2.f90 (code 1)

The code does not have any

Juergen_R_R — Wed, 12 Dec 2018 09:42:49 GMT

The code does not have any problems with any compiler that I have at hand, including ifort 17.0.8, ifort 18.0.5 or ifort 19.0.1. An ICE is a compiler bug, yes, but obviously it has been fixed even in the v17 of ifort. So why don't you just upgrade?

topic internal compiler error when initializing in Intel® Fortran Compiler

internal compiler error when initializing

The code does not have any