summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/p-valprint.c1
2 files changed, 6 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 7c506578738..cfd8c5b9d24 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2020-03-16 Tom Tromey <tom@tromey.com>
+
+ * p-valprint.c (pascal_object_print_value): Initialize
+ base_value.
+
2020-03-16 Anton Kolesov <anton.kolesov@synopsys.com>
Shahab Vahedi <shahab@synopsys.com>
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c
index 35a4e59d250..cbd7fb75e24 100644
--- a/gdb/p-valprint.c
+++ b/gdb/p-valprint.c
@@ -739,6 +739,7 @@ pascal_object_print_value (struct value *val, struct ui_file *stream,
}
catch (const gdb_exception_error &ex)
{
+ base_value = nullptr;
if (ex.error == NOT_AVAILABLE_ERROR)
skip = -1;
else