ICE and segmentation fault with user defined type containing
pointer elements when assigning a parameter object to
a non parameter object.
Happen on gcc version 4.0.0 20041226.
To reproduce, compile the following code:
PROGRAM TEST
IMPLICIT NONE
TYPE typea
INTEGER, DIMENSION(:) , POINTER :: member => NULL()
END TYPE typea
TYPE(typea), PARAMETER:: undefined_a = typea( NULL())
TYPE(typea) :: a
a=undefined_a
END PROGRAM TEST
No ICE occurs if the parameter keyword is removed.
--
Summary: ICE and segmentation fault with pointer member in user
defined type
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: santugi at dptmaths dot ens-cachan dot fr
CC: gcc-bugs at gcc dot gnu dot org
GCC build triplet: freebsd
GCC host triplet: freebsd
GCC target triplet: freebsd
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19181
