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/parse.c | |
| 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/parse.c')
| -rw-r--r-- | gdb/parse.c | 2 |
1 files changed, 1 insertions, 1 deletions
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); } |