[Bug fortran/16535] New: ICE in internal write

["schnetter at aei dot mpg dot de" <gcc-bugzilla at gcc dot gnu dot org>]

The following subroutine leads to an ICE: 
 
subroutine MPWT_transform_metric 
  integer   :: info 
  character :: msg(1000) 
  write (msg, '("Error in call to DGESV, info=",i4)') info 
end subroutine MPWT_transform_metric 
 
with 
 
GNU Fortran 95 (GCC 3.5.0 20040713 (experimental)) 
 
The code is strange in that msg is an array of one-character strings instead 
of a single string.

-- 
           Summary: ICE in internal write
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: schnetter at aei dot mpg dot de
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


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