[Bug fortran/102287] optional allocatable array arguments (intent out) of derived types with allocatable components are not properly passed to subroutines.

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

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

--- Comment #7 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-9 branch has been updated by Harald Anlauf
<anl...@gcc.gnu.org>:

https://gcc.gnu.org/g:4210c6c62f6938cd70d768b1bd1ea98d13e3b805

commit r9-9737-g4210c6c62f6938cd70d768b1bd1ea98d13e3b805
Author: Harald Anlauf <anl...@gmx.de>
Date:   Thu Sep 16 20:12:21 2021 +0200

    Fortran - fix handling of optional allocatable DT arguments with
INTENT(OUT)

    gcc/fortran/ChangeLog:

            PR fortran/102287
            * trans-expr.c (gfc_conv_procedure_call): Wrap deallocation of
            allocatable components of optional allocatable derived type
            procedure arguments with INTENT(OUT) into a presence check.

    gcc/testsuite/ChangeLog:

            PR fortran/102287
            * gfortran.dg/intent_out_14.f90: New test.

    (cherry picked from commit cfea7b86f2430b9cb8018379b071f4004233119c)