[Bug fortran/111674] [13/14 regression] Failure to finalize an allocatable subobject of a non-finalizable type

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #4 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-13 branch has been updated by Paul Thomas <pa...@gcc.gnu.org>:

https://gcc.gnu.org/g:29cd67f93f00cc7a9b08eae4f3e12e67ed568f19

commit r13-7934-g29cd67f93f00cc7a9b08eae4f3e12e67ed568f19
Author: Paul Thomas <pa...@gcc.gnu.org>
Date:   Wed Oct 4 08:26:35 2023 +0100

    Fortran: Alloc comp of non-finalizable type not finalized [PR111674]

    2023-10-04  Paul Thomas  <pa...@gcc.gnu.org>

    gcc/fortran
            PR fortran/37336
            PR fortran/111674
            * trans-expr.cc (gfc_trans_scalar_assign): Finalize components
            on deallocation if derived type is not finalizable.

    gcc/testsuite/
            PR fortran/37336
            PR fortran/111674
            * gfortran.dg/allocate_with_source_25.f90: Final count in tree
            dump reverts from 4 to original 6.
            * gfortran.dg/finalize_38.f90: Add test for fix of PR111674.

    (cherry picked from commit 84284e1c490e9235fca5cb85269ecfcb87eef4f1)