[51/55] Convert ada_value_print to value-based API

Message ID 20191208182958.10181-52-tom@tromey.com
State New, archived
Headers

Commit Message

Tom Tromey Dec. 8, 2019, 6:29 p.m. UTC
  This converts ada_value_print to the value-based API by using
common_val_print rather than val_print.

gdb/ChangeLog
2019-12-08  Tom Tromey  <tom@tromey.com>

	* ada-valprint.c (ada_value_print): Use common_val_print.

Change-Id: I63a3490b7175042bd212c593d3749fd5baebf1a5
---
 gdb/ChangeLog      | 4 ++++
 gdb/ada-valprint.c | 5 +----
 2 files changed, 5 insertions(+), 4 deletions(-)
  

Patch

diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c
index 1764b70d1e1..f0baa9945a2 100644
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -1424,7 +1424,6 @@  ada_value_print (struct value *val0, struct ui_file *stream,
 		 const struct value_print_options *options)
 {
   struct value *val = ada_to_fixed_value (val0);
-  CORE_ADDR address = value_address (val);
   struct type *type = ada_check_typedef (value_type (val));
   struct value_print_options opts;
 
@@ -1464,7 +1463,5 @@  ada_value_print (struct value *val0, struct ui_file *stream,
 
   opts = *options;
   opts.deref_ref = 1;
-  val_print (type,
-	     value_embedded_offset (val), address,
-	     stream, 0, val, &opts, current_language);
+  common_val_print (val, stream, 0, &opts, current_language);
 }