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 | c0941be613054fe525891a2898e7d938b8e8ceed (patch) | |
| tree | 2f785c4a8c5a31adaa7a1432809a5c5594b06f46 /gdb/p-valprint.c | |
| parent | 62c4663d3c59b53e622b2f83eeae7c8d47c656dd (diff) | |
| download | gdb-c0941be613054fe525891a2898e7d938b8e8ceed.zip gdb-c0941be613054fe525891a2898e7d938b8e8ceed.tar.gz gdb-c0941be613054fe525891a2898e7d938b8e8ceed.tar.bz2 | |
Introduce pascal_value_print_inner
This introduces pascal_value_print_inner.
gdb/ChangeLog
2020-03-13 Tom Tromey <tom@tromey.com>
* p-valprint.c (pascal_value_print_inner): New function.
* p-lang.h (pascal_value_print_inner): Declare.
* p-lang.c (pascal_language_defn): Use pascal_value_print_inner.
Diffstat (limited to 'gdb/p-valprint.c')
| -rw-r--r-- | gdb/p-valprint.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index 68e8c6e..1361fbe 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -425,6 +425,19 @@ pascal_val_print (struct type *type, TYPE_CODE (type)); } } + +/* See p-lang.h. */ + +void +pascal_value_print_inner (struct value *val, struct ui_file *stream, + int recurse, + const struct value_print_options *options) + +{ + pascal_val_print (value_type (val), value_embedded_offset (val), + value_address (val), stream, recurse, val, options); +} + void pascal_value_print (struct value *val, struct ui_file *stream, |