aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@adacore.com>2020-11-01 02:41:06 -0500
committerJoel Brobecker <brobecker@adacore.com>2020-11-01 03:46:10 -0500
commit60bd1d53a061e135763b46929ee900c14727ccf4 (patch)
treeb6b4eab5f664a0e69ab3ddd5703c8279a0e8ffb5
parentdb99d0d055a05d746fdc8d84a0a667c53154f760 (diff)
downloadfsf-binutils-gdb-60bd1d53a061e135763b46929ee900c14727ccf4.zip
fsf-binutils-gdb-60bd1d53a061e135763b46929ee900c14727ccf4.tar.gz
fsf-binutils-gdb-60bd1d53a061e135763b46929ee900c14727ccf4.tar.bz2
ada-lang.c: Rename gnat_encoded_fixed_type_info
This commit renames gnat_encoded_fixed_type_info into gnat_encoded_fixed_point_type_info, so as to be more consistent with the naming used for the other associated routines (i.e. use "fixed_point" rather than just "fixed"). gdb/ChangeLog: * ada-lang.c (gnat_encoded_fixed_point_type_info): Renames gnat_encoded_fixed_type_info. Update all callers.
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/ada-lang.c10
2 files changed, 10 insertions, 5 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 4654c20..5ec5d25 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,10 @@
2020-11-01 Joel Brobecker <brobecker@adacore.com>
+ * ada-lang.c (gnat_encoded_fixed_point_type_info): Renames
+ gnat_encoded_fixed_type_info. Update all callers.
+
+2020-11-01 Joel Brobecker <brobecker@adacore.com>
+
* ada-lang.c (cast_from_gnat_encoded_fixed_point_type): Split
line too long.
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index e94dd8c..930a514 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -11120,7 +11120,7 @@ nosideret:
Otherwise, return NULL. */
static const char *
-gnat_encoded_fixed_type_info (struct type *type)
+gnat_encoded_fixed_point_type_info (struct type *type)
{
const char *name = ada_type_name (type);
enum type_code code = (type == NULL) ? TYPE_CODE_UNDEF : type->code ();
@@ -11135,7 +11135,7 @@ gnat_encoded_fixed_type_info (struct type *type)
return tail + 5;
}
else if (code == TYPE_CODE_RANGE && TYPE_TARGET_TYPE (type) != type)
- return gnat_encoded_fixed_type_info (TYPE_TARGET_TYPE (type));
+ return gnat_encoded_fixed_point_type_info (TYPE_TARGET_TYPE (type));
else
return NULL;
}
@@ -11145,7 +11145,7 @@ gnat_encoded_fixed_type_info (struct type *type)
int
ada_is_gnat_encoded_fixed_point_type (struct type *type)
{
- return gnat_encoded_fixed_type_info (type) != NULL;
+ return gnat_encoded_fixed_point_type_info (type) != NULL;
}
/* Return non-zero iff TYPE represents a System.Address type. */
@@ -11173,7 +11173,7 @@ ada_scaling_type (struct type *type)
struct value *
gnat_encoded_fixed_point_delta (struct type *type)
{
- const char *encoding = gnat_encoded_fixed_type_info (type);
+ const char *encoding = gnat_encoded_fixed_point_type_info (type);
struct type *scale_type = ada_scaling_type (type);
long long num, den;
@@ -11191,7 +11191,7 @@ gnat_encoded_fixed_point_delta (struct type *type)
struct value *
gnat_encoded_fixed_point_scaling_factor (struct type *type)
{
- const char *encoding = gnat_encoded_fixed_type_info (type);
+ const char *encoding = gnat_encoded_fixed_point_type_info (type);
struct type *scale_type = ada_scaling_type (type);
long long num0, den0, num1, den1;