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:40 -0600 |
| commit | 26792ee0345c09bd1c76f3ee0e16ed15ab7215b9 (patch) | |
| tree | f4247dc2530b2e306004f9d8dd70dceebe528158 /gdb/ada-valprint.c | |
| parent | 24051bbe843abcdcc108542da195e009c3f19910 (diff) | |
| download | gdb-26792ee0345c09bd1c76f3ee0e16ed15ab7215b9.zip gdb-26792ee0345c09bd1c76f3ee0e16ed15ab7215b9.tar.gz gdb-26792ee0345c09bd1c76f3ee0e16ed15ab7215b9.tar.bz2 | |
Introduce ada_value_print_inner
This introduces ada_value_print_inner.
gdb/ChangeLog
2020-03-13 Tom Tromey <tom@tromey.com>
* ada-valprint.c (ada_value_print_inner): New function.
* ada-lang.h (ada_value_print_inner): Declare.
* ada-lang.c (ada_language_defn): Use ada_value_print_inner.
Diffstat (limited to 'gdb/ada-valprint.c')
| -rw-r--r-- | gdb/ada-valprint.c | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c index b918caf..c983cbb 100644 --- a/gdb/ada-valprint.c +++ b/gdb/ada-valprint.c @@ -1222,6 +1222,17 @@ ada_val_print (struct type *type, } } +/* See ada-lang.h. */ + +void +ada_value_print_inner (struct value *val, struct ui_file *stream, + int recurse, + const struct value_print_options *options) +{ + ada_val_print (value_type (val), value_embedded_offset (val), + value_address (val), stream, recurse, val, options); +} + void ada_value_print (struct value *val0, struct ui_file *stream, const struct value_print_options *options) |