diff options
author | Tom Tromey <tromey@adacore.com> | 2021-02-11 08:27:46 -0700 |
---|---|---|
committer | Tom Tromey <tromey@adacore.com> | 2021-02-11 08:32:50 -0700 |
commit | b260f8d60c24fb541b9b4635ed31e30e6acd6b7a (patch) | |
tree | 5586d8b160f3f6f890baa2d2ece98e182143dde6 /gdb | |
parent | 234b98ced24d97fad84c7802708cf3cf5fd4fb63 (diff) | |
download | gdb-b260f8d60c24fb541b9b4635ed31e30e6acd6b7a.zip gdb-b260f8d60c24fb541b9b4635ed31e30e6acd6b7a.tar.gz gdb-b260f8d60c24fb541b9b4635ed31e30e6acd6b7a.tar.bz2 |
Fix two Fortran regressions
Luis pointed out that an earlier patch of mine caused two regressions
in gdb.fortran. This patch fixes the problem.
Regression tested on x86-64 Fedora 32.
gdb/ChangeLog
2021-02-11 Tom Tromey <tromey@adacore.com>
PR gdb/27383:
* parse.c (write_exp_symbol_reference): Write sym.block.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/parse.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 10f391e..4d0033d 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,8 @@ +2021-02-11 Tom Tromey <tromey@adacore.com> + + PR gdb/27383: + * parse.c (write_exp_symbol_reference): Write sym.block. + 2021-02-11 Andrew Burgess <andrew.burgess@embecosm.com> * NEWS: Mention changes to 'maint info sections'. diff --git a/gdb/parse.c b/gdb/parse.c index d634a4f..884a008 100644 --- a/gdb/parse.c +++ b/gdb/parse.c @@ -661,7 +661,7 @@ write_exp_symbol_reference (struct parser_state *pstate, const char *name, if (symbol_read_needs_frame (sym.symbol)) pstate->block_tracker->update (sym); write_exp_elt_opcode (pstate, OP_VAR_VALUE); - write_exp_elt_block (pstate, NULL); + write_exp_elt_block (pstate, sym.block); write_exp_elt_sym (pstate, sym.symbol); write_exp_elt_opcode (pstate, OP_VAR_VALUE); } |