aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-valprint.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2020-03-13 17:39:52 -0600
committerTom Tromey <tom@tromey.com>2020-03-13 18:03:40 -0600
commit24051bbe843abcdcc108542da195e009c3f19910 (patch)
tree211eb877dfc66ff1e14ec6d6469280fdc8318ba0 /gdb/f-valprint.c
parentc0941be613054fe525891a2898e7d938b8e8ceed (diff)
downloadgdb-24051bbe843abcdcc108542da195e009c3f19910.zip
gdb-24051bbe843abcdcc108542da195e009c3f19910.tar.gz
gdb-24051bbe843abcdcc108542da195e009c3f19910.tar.bz2
Introduce f_value_print_innner
This introduces f_value_print_innner. gdb/ChangeLog 2020-03-13 Tom Tromey <tom@tromey.com> * f-valprint.c (f_value_print_innner): New function. * f-lang.h (f_value_print_innner): Declare. * f-lang.c (f_language_defn): Use f_value_print_innner.
Diffstat (limited to 'gdb/f-valprint.c')
-rw-r--r--gdb/f-valprint.c10
1 files changed, 10 insertions, 0 deletions
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c
index bbc09cd..10593ee 100644
--- a/gdb/f-valprint.c
+++ b/gdb/f-valprint.c
@@ -394,6 +394,16 @@ f_val_print (struct type *type, int embedded_offset,
}
}
+/* See f-lang.h. */
+
+void
+f_value_print_innner (struct value *val, struct ui_file *stream, int recurse,
+ const struct value_print_options *options)
+{
+ f_val_print (value_type (val), value_embedded_offset (val),
+ value_address (val), stream, recurse, val, options);
+}
+
static void
info_common_command_for_block (const struct block *block, const char *comname,
int *any_printed)