* sinfo.h, treeprs.ads: Regenerated.

From-SVN: r73601

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 900f8751b0ba936572715652b6542f3617bc67c6..42cc51e12a53ba6743b1ffe30a516120e57f3dcd 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,6 +1,6 @@
 2003-11-14  Arnaud Charlet  <charlet@act-europe.fr>
 
-       * nmake.ads, nmake.adb: Regenerated.
+       * nmake.ads, nmake.adb, sinfo.h, treeprs.ads: Regenerated.
 
 2003-11-13  Vincent Celier  <celier@gnat.com>
 

diff --git a/gcc/ada/sinfo.h b/gcc/ada/sinfo.h
index fd5d13d2b8945afceb5d81cc8e8d20fe12ca2803..b78057553624cbb2e5d126301aea06481a2d44a3 100644 (file)
--- a/gcc/ada/sinfo.h
+++ b/gcc/ada/sinfo.h
@@ -511,6 +511,8 @@
       { return Uint5 (N); }
    INLINE Node_Id   Entity                         (Node_Id N)
       { return Node4 (N); }
+   INLINE Node_Id   Entity_Or_Associated_Node      (Node_Id N)
+      { return Node4 (N); }
    INLINE Node_Id   Entry_Body_Formal_Part         (Node_Id N)
       { return Node5 (N); }
    INLINE Node_Id   Entry_Call_Alternative         (Node_Id N)

diff --git a/gcc/ada/treeprs.ads b/gcc/ada/treeprs.ads
index 433cb081975dd2a997ebc04dcde01a99c867140a..118f58eb330989de6a8e9cd1d00ac300bb982e76 100644 (file)
--- a/gcc/ada/treeprs.ads
+++ b/gcc/ada/treeprs.ads
@@ -460,7 +460,7 @@ package Treeprs is
       --  Compilation_Unit_Aux
       "$Declarations#Actions'Pragmas_After&Config_Pragmas" &
       --  Component_Association
-      "#Choices$Loop_Actions%Expression" &
+      "#Choices$Loop_Actions%Expression6Box_Present" &
       --  Component_List
       "%Component_Items&Variant_Part4Null_Present" &
       --  Derived_Type_Definition
@@ -739,58 +739,58 @@ package Treeprs is
       N_Compilation_Unit                       => 7317,
       N_Compilation_Unit_Aux                   => 7456,
       N_Component_Association                  => 7506,
-      N_Component_List                         => 7538,
-      N_Derived_Type_Definition                => 7580,
-      N_Decimal_Fixed_Point_Definition         => 7638,
-      N_Defining_Program_Unit_Name             => 7698,
-      N_Delta_Constraint                       => 7723,
-      N_Designator                             => 7757,
-      N_Digits_Constraint                      => 7773,
-      N_Discriminant_Association               => 7808,
-      N_Discriminant_Specification             => 7834,
-      N_Enumeration_Type_Definition            => 7901,
-      N_Entry_Body                             => 7920,
-      N_Entry_Call_Alternative                 => 8027,
-      N_Exception_Declaration                  => 8074,
-      N_Exception_Handler                      => 8123,
-      N_Floating_Point_Definition              => 8188,
-      N_Formal_Decimal_Fixed_Point_Definition  => 8231,
-      N_Formal_Derived_Type_Definition         => 8231,
-      N_Formal_Discrete_Type_Definition        => 8277,
-      N_Formal_Floating_Point_Definition       => 8277,
-      N_Formal_Modular_Type_Definition         => 8277,
-      N_Formal_Ordinary_Fixed_Point_Definition => 8277,
-      N_Formal_Package_Declaration             => 8277,
-      N_Formal_Private_Type_Definition         => 8364,
-      N_Formal_Signed_Integer_Type_Definition  => 8412,
-      N_Formal_Subprogram_Declaration          => 8412,
-      N_Generic_Association                    => 8451,
-      N_Handled_Sequence_Of_Statements         => 8499,
-      N_Index_Or_Discriminant_Constraint       => 8591,
-      N_Itype_Reference                        => 8603,
-      N_Label                                  => 8609,
-      N_Modular_Type_Definition                => 8635,
-      N_Number_Declaration                     => 8646,
-      N_Ordinary_Fixed_Point_Definition        => 8695,
-      N_Others_Choice                          => 8737,
-      N_Package_Specification                  => 8772,
-      N_Parameter_Association                  => 8881,
-      N_Parameter_Specification                => 8939,
-      N_Protected_Definition                   => 9068,
-      N_Range_Constraint                       => 9140,
-      N_Real_Range_Specification               => 9157,
-      N_Record_Definition                      => 9178,
-      N_Signed_Integer_Type_Definition         => 9264,
-      N_Single_Protected_Declaration           => 9285,
-      N_Subunit                                => 9326,
-      N_Task_Definition                        => 9362,
-      N_Triggering_Alternative                 => 9500,
-      N_Use_Type_Clause                        => 9547,
-      N_Validate_Unchecked_Conversion          => 9598,
-      N_Variant                                => 9622,
-      N_Variant_Part                           => 9701,
-      N_With_Clause                            => 9715,
-      N_With_Type_Clause                       => 9929,
-      N_Unused_At_End                          => 9949);
+      N_Component_List                         => 7550,
+      N_Derived_Type_Definition                => 7592,
+      N_Decimal_Fixed_Point_Definition         => 7650,
+      N_Defining_Program_Unit_Name             => 7710,
+      N_Delta_Constraint                       => 7735,
+      N_Designator                             => 7769,
+      N_Digits_Constraint                      => 7785,
+      N_Discriminant_Association               => 7820,
+      N_Discriminant_Specification             => 7846,
+      N_Enumeration_Type_Definition            => 7913,
+      N_Entry_Body                             => 7932,
+      N_Entry_Call_Alternative                 => 8039,
+      N_Exception_Declaration                  => 8086,
+      N_Exception_Handler                      => 8135,
+      N_Floating_Point_Definition              => 8200,
+      N_Formal_Decimal_Fixed_Point_Definition  => 8243,
+      N_Formal_Derived_Type_Definition         => 8243,
+      N_Formal_Discrete_Type_Definition        => 8289,
+      N_Formal_Floating_Point_Definition       => 8289,
+      N_Formal_Modular_Type_Definition         => 8289,
+      N_Formal_Ordinary_Fixed_Point_Definition => 8289,
+      N_Formal_Package_Declaration             => 8289,
+      N_Formal_Private_Type_Definition         => 8376,
+      N_Formal_Signed_Integer_Type_Definition  => 8424,
+      N_Formal_Subprogram_Declaration          => 8424,
+      N_Generic_Association                    => 8463,
+      N_Handled_Sequence_Of_Statements         => 8511,
+      N_Index_Or_Discriminant_Constraint       => 8603,
+      N_Itype_Reference                        => 8615,
+      N_Label                                  => 8621,
+      N_Modular_Type_Definition                => 8647,
+      N_Number_Declaration                     => 8658,
+      N_Ordinary_Fixed_Point_Definition        => 8707,
+      N_Others_Choice                          => 8749,
+      N_Package_Specification                  => 8784,
+      N_Parameter_Association                  => 8893,
+      N_Parameter_Specification                => 8951,
+      N_Protected_Definition                   => 9080,
+      N_Range_Constraint                       => 9152,
+      N_Real_Range_Specification               => 9169,
+      N_Record_Definition                      => 9190,
+      N_Signed_Integer_Type_Definition         => 9276,
+      N_Single_Protected_Declaration           => 9297,
+      N_Subunit                                => 9338,
+      N_Task_Definition                        => 9374,
+      N_Triggering_Alternative                 => 9512,
+      N_Use_Type_Clause                        => 9559,
+      N_Validate_Unchecked_Conversion          => 9610,
+      N_Variant                                => 9634,
+      N_Variant_Part                           => 9713,
+      N_With_Clause                            => 9727,
+      N_With_Type_Clause                       => 9941,
+      N_Unused_At_End                          => 9961);
 
 end Treeprs;