Compiler blows up on this function.
$ cat test.f
integer*4 function test(charr, charrlen)
character (len=*) :: charr
integer*4 charrlen, i
do i=1, charrlen
write (*,*) i, charr(i)
end do
end
$ gfortran -c test.f
test.f: In function 'test':
test.f:5: internal compiler error: Bus error
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
gfortran: Internal error: Bus error (program f951)
Please submit a full bug report.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$ gfortran --version
GNU Fortran 95 (GCC) 4.2.0 20060713 (experimental)
Copyright (C) 2006 Free Software Foundation, Inc.
--
Summary: ICE on write
Product: gcc
Version: 4.2.0
Status: UNCONFIRMED
Severity: major
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: pogo_tomcat at yahoo dot com
GCC build triplet: powerpc-apple-darwin8
GCC host triplet: powerpc-apple-darwin8
GCC target triplet: powerpc-apple-darwin8
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28890
