diff options
| author | Paul Thomas <pault@gcc.gnu.org> | 2025-02-07 12:46:44 +0000 |
|---|---|---|
| committer | Paul Thomas <pault@gcc.gnu.org> | 2025-02-07 12:46:56 +0000 |
| commit | 251aa524a314faa749b7dd1b7da048e6e6476015 (patch) | |
| tree | 624f2fc06cd9000e6d4b01f8de7b4ab2cf433430 /gcc/fortran/trans-expr.cc | |
| parent | 4931a637479aba35e35c50a86f58ecd6262bc487 (diff) | |
| download | gcc-251aa524a314faa749b7dd1b7da048e6e6476015.zip gcc-251aa524a314faa749b7dd1b7da048e6e6476015.tar.gz gcc-251aa524a314faa749b7dd1b7da048e6e6476015.tar.bz2 | |
Fortran: Fix default init of finalizable derived argus [PR116829]
2025-02-07 Tomáš Trnka <trnka@scm.com>
gcc/fortran
PR fortran/116829
* trans-decl.cc (init_intent_out_dt): Always call
gfc_init_default_dt() for BT_DERIVED to apply s->value if the
symbol isn't allocatable. Also simplify the logic a bit.
gcc/testsuite/
PR fortran/116829
* gfortran.dg/derived_init_7.f90: New test.
Diffstat (limited to 'gcc/fortran/trans-expr.cc')
0 files changed, 0 insertions, 0 deletions