14 May 2022 2:04
#28974
The 8.84 compiler fails to compile the following cut-down code with /64. There is no problem with 32-bit compilation, and the problem goes away if the second argument to DCMPLX is '0.0'.
subroutine FUNMR(A,n,C)
implicit none
integer::n,i,j
complex*16, dimension(0:n-1, 0:n-1) :: C
complex*16 dcmplx
real :: A(0:N-1,0:N-1)
do i=0,n-1
do j=0,n-1
C(i,j)=dcmplx(A(i,j),0)
end do
end do
end subroutine
The compiler output:
T:\solanki>ftn95 /64 mrs1.f90
[FTN95/x64 Ver. 8.84.0 Copyright (c) Silverfrost Ltd 1993-2022]
ERROR T:\solanki\mrs1.F90 1: AMD backend failure:Failed to do register-register emit for CVTSS2SD at 97
ERROR T:\solanki\mrs1.F90 1: AMD backend failure:Failed to do memory-register emit for MOVSD at 98
ERROR T:\solanki\mrs1.F90 1: AMD backend failure:Failed to do register-memory emit for MOVDQA at 99
ERROR T:\solanki\mrs1.F90 1: AMD backend failure:Failed to do memory-register emit for MOVDQU at 101
4 ERRORS [<FUNMR> FTN95 v8.84.0]
*** Compilation failed