]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: fix passing of character length of function to procedure [PR121203]
authorHarald Anlauf <anlauf@gmx.de>
Tue, 22 Jul 2025 18:16:16 +0000 (20:16 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Wed, 23 Jul 2025 16:35:22 +0000 (18:35 +0200)
commit53b64337ef325c4e47ae96ea8dea86031a3a0602
treea18b82efd0790817c6b3ce6c972aa8150322f096
parentf796f819c35cc08e0a6e7242aee92eb96f62a3b5
Fortran: fix passing of character length of function to procedure [PR121203]

PR fortran/121203

gcc/fortran/ChangeLog:

* trans-expr.cc (gfc_conv_procedure_call): Obtain the character
length of an assumed character length procedure from the typespec
of the actual argument even if there is no explicit interface.

gcc/testsuite/ChangeLog:

* gfortran.dg/function_charlen_4.f90: New test.
gcc/fortran/trans-expr.cc
gcc/testsuite/gfortran.dg/function_charlen_4.f90 [new file with mode: 0644]