]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: fix bogus runtime error with optional procedure argument [PR121145]
authorHarald Anlauf <anlauf@gmx.de>
Fri, 18 Jul 2025 19:12:03 +0000 (21:12 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Fri, 18 Jul 2025 19:12:03 +0000 (21:12 +0200)
commit8f9450505f8244d262f8b4ff274f113f99cdc7e2
tree5f739dfc7e71bdc948fff151f33999de6da452be
parentf069bacbf5d0f14974b8f180588bac51f9ef1a43
Fortran: fix bogus runtime error with optional procedure argument [PR121145]

PR fortran/121145

gcc/fortran/ChangeLog:

* trans-expr.cc (gfc_conv_procedure_call): Do not create pointer
check for proc-pointer actual passed to optional dummy.

gcc/testsuite/ChangeLog:

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