re PR fortran/64209 ([OOP] runtime segfault with CLASS(*), INTENT(OUT) dummy argument)
authorJanus Weil <janus@gcc.gnu.org>
Fri, 19 Dec 2014 19:28:57 +0000 (20:28 +0100)
committerJanus Weil <janus@gcc.gnu.org>
Fri, 19 Dec 2014 19:28:57 +0000 (20:28 +0100)
commit375550c647d112d5ae064401074507ff14092ddd
treefe4c60e1b5da3e023b7a86f3e47851150ce8ddf8
parent34a2b7558b37707a17e1f2ba5298f94a88807492
re PR fortran/64209 ([OOP] runtime segfault with CLASS(*), INTENT(OUT) dummy argument)

2014-12-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/64209
* trans-expr.c (gfc_trans_class_array_init_assign): Check if _def_init
component is non-NULL.
(gfc_trans_class_init_assign): Ditto.

2014-12-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/64209
* gfortran.dg/unlimited_polymorphic_19.f90: New.

From-SVN: r218968
gcc/fortran/ChangeLog
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/unlimited_polymorphic_19.f90 [new file with mode: 0644]