https://gcc.gnu.org/bugzilla/show_bug.cgi?id=80255
Bug ID: 80255
Summary: Segfault from accessing class(*) component in an array
of any-type-wrappers
Product: gcc
Version: 7.0.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: pedsxing at gmx dot net
Target Milestone: ---
Created attachment 41078
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=41078&action=edit
Test program that shows the problem.
The attached source file compiles fine but produces a segfault with gfortran
7.0.1 r153017.
Note that a segfault only occurs when printing element 1 and 3. Element 2
prints 'other type', even though I believe it should be caught by "is type
(real)".
Works fine with ifort 17.0.2 (Though one has to initialize the array in another
way, as they do not have assignment to class(*) implemented.)
