Hi, subroutine gfcbug25 ()
character (len=*), parameter :: endian(2) = (/ & "little_endian", & "big_endian " /) write (*,'(a)') endian(1) end subroutine gfcbug25 dies with: gfcbug25.f90: In function 'gfcbug25': gfcbug25.f90:6: internal compiler error: in gfc_get_symbol_decl, at fortran/trans-decl.c:821 This might be related to PR 18525, but I don't see many things in common. Cheers, -ha -- Summary: gfortran: ICE on valid code, in gfc_get_symbol_decl Product: gcc Version: 4.0.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: anlauf at hep dot tu-darmstadt dot de CC: gcc-bugs at gcc dot gnu dot org GCC host triplet: i686-pc-linux-gnu http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20279