mirrors/binutils-gdb
1
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2024-11-23 18:14:13 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Convert ada_value_print to value-based API

Browse Source 
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.
This commit is contained in:
Tom Tromey 2020-03-13 17:39:52 -06:00
parent 2e088f8b6e
commit 0337112903
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/ChangeLog
View File

@ -1,3 +1,7 @@
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.

5
gdb/ada-valprint.c
View File

@ -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);
}