$ cat a.f90
subroutine bar(s, n)
 integer n
 character s*(n)
 character*3, dimension(:), pointer :: m
contains
 subroutine gee
    m(1) = s(1:3)
 end subroutine gee
end subroutine bar

$ gfortran -c a.f90
a.f90:7: internal compiler error: Segmentation fault


-- 
           Summary: ICE on character pointer assignment
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: fxcoudert at gcc dot gnu dot org


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

Reply via email to