diff mbox

[50/55] Convert ada_val_print_ref to value-based API

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

Commit Message

Tom Tromey Dec. 8, 2019, 6:29 p.m. UTC 
  This converts ada_val_print_ref 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_val_print_ref): Use common_val_print.

Change-Id: I9f263131022e8ed759628fbd0dded464513c4762
---
 gdb/ChangeLog      | 4 ++++
 gdb/ada-valprint.c | 6 ++----
 2 files changed, 6 insertions(+), 4 deletions(-)
diff mbox

Patch

diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c
index b5d113e1713..1764b70d1e1 100644
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -1204,10 +1204,8 @@  ada_val_print_ref (struct type *type, const gdb_byte *valaddr,
   if (value_lazy (deref_val))
     value_fetch_lazy (deref_val);
 
-  val_print (value_type (deref_val),
-	     value_embedded_offset (deref_val),
-	     value_address (deref_val), stream, recurse + 1,
-	     deref_val, options, language_def (language_ada));
+  common_val_print (deref_val, stream, recurse + 1,
+		    options, language_def (language_ada));
 }
 
 /* See the comment on ada_val_print.  This function differs in that it