[Bug fortran/83118] [7/8/9 Regression] Bad intrinsic assignment of class(*) array component of derived type

[pault at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83118

--- Comment #8 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Thu Jun 21 17:34:31 2018
New Revision: 261857

URL: https://gcc.gnu.org/viewcvs?rev=261857&root=gcc&view=rev
Log:
2018-06-21  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/83118
        * resolve.c (resolve_ordinary_assign): Force the creation of a
        vtable for assignment of non-polymorphic expressions to an
        unlimited polymorphic object.
        * trans-array.c (gfc_alloc_allocatable_for_assignment): Use the
        size of the rhs type for such assignments. Set the dtype, _len
        and vptrs appropriately.
        * trans-expr.c (gfc_trans_assignment): Force the use of the
        _copy function for these assignments.

2018-06-21  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/83118
        * gfortran.dg/unlimited_polymorphic_30.f03: New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/unlimited_polymorphic_30.f03
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog