aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-valprint.c
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@adacore.com>2020-11-01 02:29:27 -0500
committerJoel Brobecker <brobecker@adacore.com>2020-11-01 02:29:27 -0500
commit75f24e86bacd5b4832b8af12e2aef59c9f769335 (patch)
tree99214130d9f1bbf6617f62335b1c6dba39824a00 /gdb/ada-valprint.c
parent80630624b4c224908b745b8a5396ff2e40896a30 (diff)
downloadfsf-binutils-gdb-75f24e86bacd5b4832b8af12e2aef59c9f769335.zip
fsf-binutils-gdb-75f24e86bacd5b4832b8af12e2aef59c9f769335.tar.gz
fsf-binutils-gdb-75f24e86bacd5b4832b8af12e2aef59c9f769335.tar.bz2
ada-lang.c: Renaming some fixed-point-related routines
This patch renames some of the fixed-point-related subprograms in ada-lang.c so as to make it obvious that those routines only handle the case where the types are encoded using the GNAT encoding. No function change; this patch is preparation work for adding support for fixed-point types purely based on standard DWARF debug info. gdb/ChangeLog: * ada-lang.c (cast_from_gnat_encoded_fixed_point_type): Renames cast_from_fixed. Update all callers. (cast_to_gnat_encoded_fixed_point_type): Renames cast_to_fixed. Update all callers. (gnat_encoded_fixed_point_scaling_factor): Renames ada_scaling_factor. Update all callers. * ada-lang.h (gnat_encoded_fixed_point_scaling_factor): Renames ada_scaling_factor. * ada-typeprint.c: Replace call to ada_scaling_factor by call to print_gnat_encoded_fixed_point_type. * ada-valprint.c: Likewise.
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 3616711..67716f7 100644
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -773,7 +773,7 @@ ada_value_print_num (struct value *val, struct ui_file *stream, int recurse,
if (ada_is_gnat_encoded_fixed_point_type (type))
{
- struct value *scale = ada_scaling_factor (type);
+ struct value *scale = gnat_encoded_fixed_point_scaling_factor (type);
val = value_cast (value_type (scale), val);
val = value_binop (val, scale, BINOP_MUL);