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.
This commit is contained in:
Joel Brobecker
2020-11-01 02:41:06 -05:00
parent db99d0d055
commit 60bd1d53a0
2 changed files with 10 additions and 5 deletions

View File

@ -1,3 +1,8 @@
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

View File

@ -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;