From c408a94f8115767ea7e6aa1a75bc59ea5ae960fa Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Fri, 10 May 2019 10:40:15 -0600 Subject: [PATCH] Fix assertion failure in coerce_unspec_val_to_type coerce_unspec_val_to_type does: set_value_address (result, value_address (val)); However, this is only valid for lval_memory. This patch changes this code to only set the address for lval_memory values. This seems like an ordinary oversight in coerce_unspec_val_to_type, and a test case would be difficult to write, so I'm submitting it without a test case. Tested on x86-64 Fedora 29; plus using an Ada program that exhibits the bug (but which cannot be shared). gdb/ChangeLog 2019-05-14 Tom Tromey * ada-lang.c (coerce_unspec_val_to_type): Only set address when value is not lval_memory. --- gdb/ChangeLog | 5 +++++ gdb/ada-lang.c | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 095a6c2..c82d70f 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2019-05-14 Tom Tromey + * ada-lang.c (coerce_unspec_val_to_type): Only set address when + value is not lval_memory. + +2019-05-14 Tom Tromey + * solib.c (info_sharedlibrary_command): Style the file name. 2019-05-14 Alan Hayward diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index dee3a83..23197f6 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -672,7 +672,8 @@ coerce_unspec_val_to_type (struct value *val, struct type *type) set_value_component_location (result, val); set_value_bitsize (result, value_bitsize (val)); set_value_bitpos (result, value_bitpos (val)); - set_value_address (result, value_address (val)); + if (VALUE_LVAL (result) == lval_memory) + set_value_address (result, value_address (val)); return result; } } -- 2.7.4