commit | 1f5787e4b803a4294eeb80e048f56ccdb99c1b3b | [log] [tgz] |
---|---|---|
author | Harald Anlauf <anlauf@gmx.de> | Sun Feb 25 21:18:23 2024 +0100 |
committer | Harald Anlauf <anlauf@gmx.de> | Wed Mar 06 21:38:06 2024 +0100 |
tree | 76de579093be7232d344a45f950f8cff612e82a2 | |
parent | 77cf842869ddda8cfcdbb7db6e65ecfb9ac432fc [diff] |
Fortran: do not evaluate polymorphic functions twice in assignment [PR114012] PR fortran/114012 gcc/fortran/ChangeLog: * trans-expr.cc (gfc_conv_procedure_call): Evaluate non-trivial arguments just once before assigning to an unlimited polymorphic dummy variable. gcc/testsuite/ChangeLog: * gfortran.dg/pr114012.f90: New test. (cherry picked from commit 2f71e801ad0bb1f620334aadbd7c99cc4efe6309)