I mistakenly called a function, and broke the compiler:

[EMAIL PROTECTED] ~/MD]$ cat diatoms.f90
module Diatoms
implicit none

contains

function InitialDiatomicX() result (v4)
real(kind=8),dimension(4)::v4
v4=1
end function InitialDiatomicX

subroutine FindDiatomicPeriod
call InitialDiatomicX()
end subroutine FindDiatomicPeriod

end module Diatoms

[EMAIL PROTECTED] ~/MD]$ gfortran -c diatoms.f90
diatoms.f90: In function ‘finddiatomicperiod’:
diatoms.f90:6: internal compiler error: in gfc_conv_function_call, at
fortran/trans-expr.c:2637
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

[EMAIL PROTECTED] ~/MD]$ gfortran -v
Using built-in specs.
Target: x86_64-unknown-linux-gnu
Configured with: ../gcc-4.3.1/configure --disable-multilib
--enable-languages=c,c++,fortran
Thread model: posix
gcc version 4.3.1 (GCC)


-- 
           Summary: ICE on calling a function
           Product: gcc
           Version: 4.3.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: terry at chem dot gu dot se
  GCC host triplet: x86_64-unknown-linux-gnu


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

Reply via email to