Using r127057 I get an internal compiler error with the following testcase:

-----------------------------------------------------------------
program test_gfortran2

implicit none

Integer,      Parameter :: &
   Double  =  Selected_Real_Kind(15,200)
Integer :: j

Complex(Double) :: g(5)
Complex(Double) :: zh(38)
Real(Double)    :: g_q(5)

do j=1,3
  g(:) = conjg(-(zh(j)/cmplx(0.0_Double, -g_q(:), Double)))- &
         zh(j)/cmplx(0,-g_q(:))
end do

end
-----------------------------------------------------------------


gfortran -c test_gfortran2.f90 gives:

-----------------------------------------------------------------
test_gfortran2.f90:15: internal compiler error: in emit_move_insn, at
expr.c:3316
----------------------------------------------------------------- 


gfortran 4.2.1 compiles fine. Platform is i686, trying this on a Debian lenny
system.


-- 
           Summary: internal compiler error: in emit_move_insn, at
                    expr.c:3316
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: flad at gmx dot at


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32935

Reply via email to