[Bug fortran/18689] New: Internal compiler error with character pointer association in module subroutine

["paulthomas2 at wanadoo dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

!Extracted from linked data demo in appendix G
!
! (c) Copyright Michael Metcalf and John Reid, 1992. This file may be
! freely used and copied for educational purposes provided this notice
! remains attached. Extracted from "Fortran 90 Explained" Oxford
! University Press (Oxford and New York), ISBN 0-19-853772-7.
!
MODULE bug
   character(4), allocatable, target :: names(:)
CONTAINS
  SUBROUTINE bugeye(pnames)
    character(4), pointer                      :: pnames(:)
    allocate (names(10))
    pnames => names
  end subroutine bugeye
end module bug
program bug_demo
  use bug
end program bug_demo

$ /gcc-4.0/bin/gfortran -O3 bug_demo.f90 -o bug_demo
bug_demo.f90: In function 'bugeye':
bug_demo.f90:16: internal compiler error: in gfc_add_modify_expr, 
at /fortran/tr
ans.c:154
Please submit a full bug report,

-- 
           Summary: Internal compiler error with character pointer
                    association in module subroutine
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: paulthomas2 at wanadoo dot fr
                CC: gcc-bugs at gcc dot gnu dot org


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