diff options
| author | Paul Thomas <pault@gcc.gnu.org> | 2024-10-25 17:59:03 +0100 |
|---|---|---|
| committer | Paul Thomas <pault@gcc.gnu.org> | 2024-10-25 17:59:50 +0100 |
| commit | 6cb1da72cac166bd3b005c0430557b68b9761da5 (patch) | |
| tree | a8ee3161cfd93148f58abb453c8a353b4abf4a8d /libatomic/fsub_n.c | |
| parent | 68e7ced1c7a9b205d3de5937d36ceab94fb44144 (diff) | |
| download | gcc-6cb1da72cac166bd3b005c0430557b68b9761da5.zip gcc-6cb1da72cac166bd3b005c0430557b68b9761da5.tar.gz gcc-6cb1da72cac166bd3b005c0430557b68b9761da5.tar.bz2 | |
Fortran: Fix ICE with structure constructor in data statement [PR79685]
2024-10-25 Paul Thomas <pault@gcc.gnu.org>
gcc/fortran
PR fortran/79685
* decl.cc (match_data_constant): Find the symtree instead of
the symbol so the use renamed symbols are found. Pass this and
the derived type to gfc_match_structure_constructor.
* match.h: Update prototype of gfc_match_structure_contructor.
* primary.cc (gfc_match_structure_constructor): Remove call to
gfc_get_ha_sym_tree and use caller supplied symtree instead.
gcc/testsuite/
PR fortran/79685
* gfortran.dg/use_rename_13.f90: New test.
Diffstat (limited to 'libatomic/fsub_n.c')
0 files changed, 0 insertions, 0 deletions