[Bug fortran/97245] ASSOCIATED intrinsic does not recognize a pointer variable the second time it is used

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

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

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

https://gcc.gnu.org/g:e6ea74b68c5904446da6050751fde97d02549d1f

commit r13-8002-ge6ea74b68c5904446da6050751fde97d02549d1f
Author: Harald Anlauf <anl...@gmx.de>
Date:   Fri Nov 3 19:41:54 2023 +0100

    Fortran: fix issue with multiple references of a procedure pointer
[PR97245]

    gcc/fortran/ChangeLog:

            PR fortran/97245
            * match.cc (gfc_match_call): If a procedure pointer has already
been
            resolved, do not create a new symbol in a procedure reference of
            the same name shadowing the first one if it is host-associated.

    gcc/testsuite/ChangeLog:

            PR fortran/97245
            * gfortran.dg/proc_ptr_53.f90: New test.

    (cherry picked from commit 5340f48b7639fcc874f64aac214f9ef9ae43d43e)