From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1914) id 390DA3857C59; Fri, 1 Oct 2021 06:14:36 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 390DA3857C59 MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Pierre-Marie de Rodat To: gcc-cvs@gcc.gnu.org Subject: [gcc r12-4006] [Ada] Add N_Entity_Name X-Act-Checkin: gcc X-Git-Author: Richard Kenner X-Git-Refname: refs/heads/master X-Git-Oldrev: cafd1c1a71325c0e9dc6a6862fdd5dcd7248fbb6 X-Git-Newrev: 7916838b6674e7d0ed0c488d22e89e2b679f1292 Message-Id: <20211001061436.390DA3857C59@sourceware.org> Date: Fri, 1 Oct 2021 06:14:36 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Fri, 01 Oct 2021 06:14:36 -0000 https://gcc.gnu.org/g:7916838b6674e7d0ed0c488d22e89e2b679f1292 commit r12-4006-g7916838b6674e7d0ed0c488d22e89e2b679f1292 Author: Richard Kenner Date: Thu Aug 5 17:05:40 2021 -0400 [Ada] Add N_Entity_Name gcc/ada/ * gen_il-gen-gen_nodes.adb (N_Entity_Name): Add. * gen_il-types.ads (N_Entity_Name): Likewise. Diff: --- gcc/ada/gen_il-gen-gen_nodes.adb | 10 ++++++++++ gcc/ada/gen_il-types.ads | 1 + 2 files changed, 11 insertions(+) diff --git a/gcc/ada/gen_il-gen-gen_nodes.adb b/gcc/ada/gen_il-gen-gen_nodes.adb index 43d77f2032f..32cc89a081a 100644 --- a/gcc/ada/gen_il-gen-gen_nodes.adb +++ b/gcc/ada/gen_il-gen-gen_nodes.adb @@ -1662,4 +1662,14 @@ begin -- Gen_IL.Gen.Gen_Nodes N_Has_Entity, N_Subtype_Indication)); -- Nodes that can be an index of an array + + Union (N_Entity_Name, + Children => + (N_Expanded_Name, + N_Identifier, + N_Operator_Symbol)); + -- Nodes that are definitely representing an entity. + -- Some N_Attribute_Reference nodes may also represent an entity. See + -- Is_Entity_Name. + end Gen_IL.Gen.Gen_Nodes; diff --git a/gcc/ada/gen_il-types.ads b/gcc/ada/gen_il-types.ads index c8f87f9d12d..4aadf99cf77 100644 --- a/gcc/ada/gen_il-types.ads +++ b/gcc/ada/gen_il-types.ads @@ -84,6 +84,7 @@ package Gen_IL.Types is N_Delay_Statement, N_Direct_Name, N_Entity, + N_Entity_Name, N_Formal_Subprogram_Declaration, N_Generic_Declaration, N_Generic_Instantiation,