[Bug fortran/98573] Dynamic type lost on assignment

[cvs-commit at gcc dot gnu.org]

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

--- Comment #10 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-16 branch has been updated by Paul Thomas <pault@gcc.gnu.org>:

https://gcc.gnu.org/g:6a0c0ec82f8a9eac222af25eb8d83b14eb241bd7

commit r16-9593-g6a0c0ec82f8a9eac222af25eb8d83b14eb241bd7
Author: Paul Thomas <pault@gcc.gnu.org>
Date:   Sun Aug 9 15:38:50 2026 +0100

    Fortran: Fix missing vptrs for class allocations [PR98573]

    2026-08-09  Paul Thomas  <pault@gcc.gnu.org>

    gcc/fortran
            PR fortran/98573
            * trans-array.cc (gfc_array_init_size): If the expr3_desc is an
            array descriptor, use it for 'type'.
            * trans-stmt.cc (gfc_trans_allocate): Use trans_assignment to
            assign the source for class sources.

    gcc/testsuite/
            PR fortran/98573
            * gfortran.dg/allocate_class_5.f90: New test.

    (cherry picked from commit d4a985f88b45bef56a5ad3be00af53dfa8136422)