diff options
author | Tom Tromey <tom@tromey.com> | 2020-03-13 17:39:52 -0600 |
---|---|---|
committer | Tom Tromey <tom@tromey.com> | 2020-03-13 18:03:42 -0600 |
commit | 033711290333b0d4ec5c1b744af512f7ab133478 (patch) | |
tree | d87b316b8e0184ed9b6ecb3d02ecc126d4f86e84 /gdb | |
parent | 2e088f8b6ea61fa9db1b592cbd4a6aa80b4e0ab5 (diff) | |
download | gdb-033711290333b0d4ec5c1b744af512f7ab133478.zip gdb-033711290333b0d4ec5c1b744af512f7ab133478.tar.gz gdb-033711290333b0d4ec5c1b744af512f7ab133478.tar.bz2 |
Convert ada_value_print to value-based API
This converts ada_value_print to the value-based API by using
common_val_print rather than val_print.
gdb/ChangeLog
2020-03-13 Tom Tromey <tom@tromey.com>
* ada-valprint.c (ada_value_print): Use common_val_print.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/ada-valprint.c | 5 |
2 files changed, 5 insertions, 4 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 78ffe61..5cf5c9a 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,9 @@ 2020-03-13 Tom Tromey <tom@tromey.com> + * ada-valprint.c (ada_value_print): Use common_val_print. + +2020-03-13 Tom Tromey <tom@tromey.com> + * ada-valprint.c (ada_val_print_ref): Use common_val_print. 2020-03-13 Tom Tromey <tom@tromey.com> diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c index 1d3b06d..dd8468a 100644 --- a/gdb/ada-valprint.c +++ b/gdb/ada-valprint.c @@ -1427,7 +1427,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; @@ -1467,7 +1466,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); } |