aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-valprint.c
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@adacore.com>2020-05-15 15:06:42 -0500
committerJoel Brobecker <brobecker@adacore.com>2020-05-15 16:06:42 -0400
commitb2188a06e4583067a503fbc271e110e814890cc1 (patch)
tree121abc54859cc2e200213193d8a056f53757c827 /gdb/ada-valprint.c
parent86e4e63d7cabb94a80a5ce767f670b65add5a083 (diff)
downloadgdb-b2188a06e4583067a503fbc271e110e814890cc1.zip
gdb-b2188a06e4583067a503fbc271e110e814890cc1.tar.gz
gdb-b2188a06e4583067a503fbc271e110e814890cc1.tar.bz2
update name of several Ada fixed-point type handling functions
The purpose of this patch is to prepare for the future where fixed point types become described using standard DWARF info, rather than GNAT encodings. For that, we rename a number of routines manipulating Ada fixed point types to make it explicit from their new names that they rely on the GNAT encodings to work. This will allow us, when we introduce support for fixed point types from standard DWARF to use names that are not ambiguous with the functions that do similar work, but only for GNAT encodings. gdb/ChangeLog: * ada-lang.h: (ada_is_gnat_encoded_fixed_point_type): Renames ada_is_fixed_point_type. Update all callers. (gnat_encoded_fixed_point_delta): Renames ada_delta. Update all callers. * ada-lang.c (gnat_encoded_fixed_type_info): Renames fixed_type_info. Update all callers. * ada-typeprint.c (print_gnat_encoded_fixed_point_type): Renames print_fixed_point_type. Update all callers. * ada-valprint.c (ada_value_print_num): Replace call to ada_is_fixed_point_type by ada_is_gnat_encoded_fixed_point_type.
Diffstat (limited to 'gdb/ada-valprint.c')
-rw-r--r--gdb/ada-valprint.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c
index 4ad4b54..e11e47e 100644
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -793,7 +793,7 @@ ada_value_print_num (struct value *val, struct ui_file *stream, int recurse,
struct type *type = ada_check_typedef (value_type (val));
const gdb_byte *valaddr = value_contents_for_printing (val);
- if (ada_is_fixed_point_type (type))
+ if (ada_is_gnat_encoded_fixed_point_type (type))
{
struct value *scale = ada_scaling_factor (type);
val = value_cast (value_type (scale), val);