The following code:
program achar_test
implicit none
integer i
character(*), parameter :: y(0:31) = (/(achar(i),i=64,95)/)
write(*,*) y
end program achar_test
causes ICE on i686-mingw and powerpc-apple-darwin:
$ gfortran achar_test.f90
achar_test.f90: In function 'MAIN__':
achar_test.f90:5: internal compiler error: in gfc_get_symbol_decl, at
fortran/trans-decl.c:827
--
Summary: [ICE] achar in initialization
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: coudert at clipper dot ens dot fr
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19576
