From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from rock.gnat.com (rock.gnat.com [205.232.38.15]) by sourceware.org (Postfix) with ESMTP id 4AA8A3857C61 for ; Sun, 1 Nov 2020 08:48:01 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org 4AA8A3857C61 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=adacore.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=brobecke@adacore.com Received: from localhost (localhost.localdomain [127.0.0.1]) by filtered-rock.gnat.com (Postfix) with ESMTP id 2B04A56173; Sun, 1 Nov 2020 03:48:01 -0500 (EST) X-Virus-Scanned: Debian amavisd-new at gnat.com Received: from rock.gnat.com ([127.0.0.1]) by localhost (rock.gnat.com [127.0.0.1]) (amavisd-new, port 10024) with LMTP id olZRKRs5ByEk; Sun, 1 Nov 2020 03:48:01 -0500 (EST) Received: from tron.gnat.com (tron.gnat.com [205.232.38.10]) by rock.gnat.com (Postfix) with ESMTP id 1B83756171; Sun, 1 Nov 2020 03:48:01 -0500 (EST) Received: by tron.gnat.com (Postfix, from userid 4233) id 1A87E10B; Sun, 1 Nov 2020 03:48:01 -0500 (EST) From: Joel Brobecker To: gdb-patches@sourceware.org Cc: Joel Brobecker Subject: [pushed] ada-lang.c: Rename gnat_encoded_fixed_type_info Date: Sun, 1 Nov 2020 03:47:57 -0500 Message-Id: <1604220477-5935-1-git-send-email-brobecker@adacore.com> X-Mailer: git-send-email 2.1.4 X-Spam-Status: No, score=-9.6 required=5.0 tests=BAYES_00, GIT_PATCH_0, KAM_DMARC_STATUS, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.2 X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on server2.sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sun, 01 Nov 2020 08:48:02 -0000 Hello, 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. Tested on x86_64-linux, and pushed to master. Thanks, -- Joel --- gdb/ChangeLog | 5 +++++ gdb/ada-lang.c | 10 +++++----- 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 + * ada-lang.c (gnat_encoded_fixed_point_type_info): Renames + gnat_encoded_fixed_type_info. Update all callers. + +2020-11-01 Joel Brobecker + * 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 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp, 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; -- 2.1.4