[Bug fortran/28890] New: ICE on write

[pogo_tomcat at yahoo dot com]

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