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

["pault at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

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

--- Comment #9 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Mon Jun 25 07:49:27 2018
New Revision: 262004

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

        PR fortran/83118
        Back port from trunk
        * 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-25  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/83118
        Back port from trunk
        * gfortran.dg/unlimited_polymorphic_30.f03: New test.


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