]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: Fix failing character pointer fcn assignment [PR105054]
authorPaul Thomas <pault@gcc.gnu.org>
Wed, 13 Nov 2024 08:57:55 +0000 (08:57 +0000)
committerPaul Thomas <pault@gcc.gnu.org>
Sat, 30 Nov 2024 10:25:41 +0000 (10:25 +0000)
commitda848c3b9396456c85d8c8055af8158148cbc1a6
treed7165dbc021bff9cf1eda2f4216f81704eb2e6ae
parentb44e2edb60ca7af37e5ba74ff9b254b30fb893b1
Fortran: Fix failing character pointer fcn assignment [PR105054]

2024-11-14  Paul Thomas  <pault@gcc.gnu.org>

gcc/fortran
PR fortran/105054
* resolve.cc (get_temp_from_expr): If the pointer function has
a deferred character length, generate a new deferred charlen
for the temporary.

gcc/testsuite/
PR fortran/105054
* gfortran.dg/ptr_func_assign_6.f08: New test.

(cherry picked from commit f530a8c61383b174a476b64f46d56adeedf49dc4)
gcc/fortran/resolve.cc
gcc/testsuite/gfortran.dg/ptr_func_assign_6.f08 [new file with mode: 0644]