http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57562
Bug ID: 57562
Summary: Internal compiler error due to extended derived type
with PARAMETER attribute
Product: gcc
Version: 4.7.3
Status: UNCONFIRMED
Severity: critical
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: helvio.vairinhos at gmail dot com
Created attachment 30277
--> http://gcc.gnu.org/bugzilla/attachment.cgi?id=30277&action=edit
ICE example
Hi,
In programs like the example below:
program example
type :: Parent
integer :: member1 = 0
end type Parent
type, extends(Parent) :: Child
integer :: member2 = 0
end type Child
integer, parameter :: member1 = 23
integer, parameter :: member2 = 42
type(Child), parameter :: object = Child(member1, member2)
print *, object%member1 !<-- No ICE if commented out
print *, object%member2
end program example
I get the following message (on versions 4.6.4 and 4.7.3):
f951: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <file:///usr/share/doc/gcc-4.7/README.Bugs> for instructions.
Best regards,
Helvio
