OSDN Git Service

* einfo.h, nmake.adb, nmake.ads, sinfo.h, treeprs.ads: Regenerate.
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 4 Dec 2001 21:28:25 +0000 (21:28 +0000)
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 4 Dec 2001 21:28:25 +0000 (21:28 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@47626 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ada/ChangeLog
gcc/ada/einfo.h
gcc/ada/nmake.adb
gcc/ada/nmake.ads
gcc/ada/sinfo.h
gcc/ada/treeprs.ads

index 6f52893..8dfd58a 100644 (file)
@@ -1,3 +1,7 @@
+2001-12-04  Geert bosch <bosch@gnat.com>
+
+       * einfo.h, nmake.adb, nmake.ads, sinfo.h treeprs.ads: Regenerate.
+
 2001-12-04  Geert Bosch  <bosch@gnat.com>
 
        * Makefile.in (update-sources): New target. 
index 5140d95..db62919 100644 (file)
@@ -7,8 +7,8 @@
 /*                              C Header File                               */
 /*                                                                          */
 /*                 Generated by xeinfo revision 1.2 using                  */
-/*                         einfo.ads revision 1.2                         */
-/*                         einfo.adb revision 1.3                         */
+/*                         einfo.ads revision 1.3                         */
+/*                         einfo.adb revision 1.4                         */
 /*                                                                          */
 /*          Copyright (C) 1992-2001 Free Software Foundation, Inc.          */
 /*                                                                          */
    INLINE B Has_Pragma_Elaborate_Body          (E Id);
    INLINE B Has_Pragma_Inline                  (E Id);
    INLINE B Has_Pragma_Pack                    (E Id);
+   INLINE B Has_Pragma_Pure_Function           (E Id);
    INLINE B Has_Primitive_Operations           (E Id);
    INLINE B Has_Qualified_Name                 (E Id);
    INLINE B Has_Record_Rep_Clause              (E Id);
    INLINE B Has_Pragma_Pack (E Id)
       { return Flag121 (Implementation_Base_Type (Id)); }
 
+   INLINE B Has_Pragma_Pure_Function (E Id)
+      { return Flag179 (Id); }
+
    INLINE B Has_Primitive_Operations (E Id)
       { return Flag120 (Base_Type (Id)); }
 
index 3e60410..f21cba3 100644 (file)
@@ -7,7 +7,7 @@
 --                                 B o d y                                  --
 --                                                                          --
 --                 Generated by xnmake revision 1.2 using                  --
---                         sinfo.ads revision 1.2                         --
+--                         sinfo.ads revision 1.5                         --
 --                         nmake.adt revision 1.1                          --
 --                                                                          --
 --          Copyright (C) 1992-2001 Free Software Foundation, Inc.          --
index c462551..0c4a6d7 100644 (file)
@@ -7,7 +7,7 @@
 --                                 S p e c                                  --
 --                                                                          --
 --                 Generated by xnmake revision 1.2 using                  --
---                         sinfo.ads revision 1.2                         --
+--                         sinfo.ads revision 1.5                         --
 --                         nmake.adt revision 1.1                          --
 --                                                                          --
 --          Copyright (C) 1992-2001 Free Software Foundation, Inc.          --
index 68cd7f3..8367427 100644 (file)
@@ -6,8 +6,8 @@
 /*                                                                          */
 /*                              C Header File                               */
 /*                                                                          */
-/*                 Generated by xsinfo revision 1.1 using                  */
-/*                         sinfo.ads revision 1.2                         */
+/*                 Generated by xsinfo revision  using                  */
+/*                         sinfo.ads revision 1.5                         */
 /*                                                                          */
 /*          Copyright (C) 1992-2001, Free Software Foundation, Inc.         */
 /*                                                                          */
       { return Node3 (N); }
    INLINE Boolean   Assignment_OK                  (Node_Id N)
       { return Flag15 (N); }
+   INLINE Node_Id   Associated_Node                (Node_Id N)
+      { return Node4 (N); }
    INLINE Node_Id   At_End_Proc                    (Node_Id N)
       { return Node1 (N); }
    INLINE Name_Id   Attribute_Name                 (Node_Id N)
index 3e9ac81..5b38e4e 100644 (file)
@@ -6,8 +6,8 @@
 --                                                                          --
 --                                 S p e c                                  --
 --                                                                          --
---                Generated by xtreeprs revision 1.1 using                 --
---                         sinfo.ads revision 1.2                          --
+--                Generated by xtreeprs revision  using                 --
+--                         sinfo.ads revision 1.5                          --
 --                        treeprs.adt revision 1.1                          --
 --                                                                          --
 --          Copyright (C) 1992-1997 Free Software Foundation, Inc.          --
@@ -132,13 +132,15 @@ package Treeprs is
       --  Defining_Operator_Symbol
       "$Next_Entity%Scope" &
       --  Expanded_Name
-      "%Prefix$Selector_Name&Entity4Redundant_Use2Has_Private_View" &
+      "%Prefix$Selector_Name&Entity&Associated_Node4Redundant_Use2Has_Privat" &
+         "e_View" &
       --  Identifier
-      "&Entity$Original_Discriminant4Redundant_Use2Has_Private_View" &
+      "&Entity&Associated_Node$Original_Discriminant4Redundant_Use2Has_Priva" &
+         "te_View" &
       --  Operator_Symbol
-      "%Strval&Entity2Has_Private_View" &
+      "%Strval&Entity&Associated_Node2Has_Private_View" &
       --  Character_Literal
-      "$Char_Literal_Value&Entity2Has_Private_View" &
+      "$Char_Literal_Value&Entity&Associated_Node2Has_Private_View" &
       --  Op_Add
       "" &
       --  Op_Concat
@@ -192,8 +194,8 @@ package Treeprs is
       --  Op_Plus
       "" &
       --  Attribute_Reference
-      "%Prefix$Attribute_Name#Expressions&Entity2Do_Access_Check8Do_Overflow" &
-         "_Check4Redundant_Use+OK_For_Stream" &
+      "%Prefix$Attribute_Name#Expressions&Entity&Associated_Node2Do_Access_C" &
+         "heck8Do_Overflow_Check4Redundant_Use+OK_For_Stream" &
       --  And_Then
       "#Actions" &
       --  Conditional_Expression
@@ -228,14 +230,14 @@ package Treeprs is
       "#Condition" &
       --  Aggregate
       "#Expressions$Component_Associations8Null_Record_Present%Aggregate_Bou" &
-         "nds+Static_Processing_OK9Compile_Time_Known_Aggregate2Expansion_De" &
-         "layed" &
+         "nds&Associated_Node+Static_Processing_OK9Compile_Time_Known_Aggreg" &
+         "ate2Expansion_Delayed" &
       --  Allocator
       "%Expression#Storage_Pool&Procedure_To_Call4No_Initialization8Do_Stora" &
          "ge_Check" &
       --  Extension_Aggregate
-      "%Ancestor_Part#Expressions$Component_Associations8Null_Record_Present" &
-         "2Expansion_Delayed" &
+      "%Ancestor_Part&Associated_Node#Expressions$Component_Associations8Nul" &
+         "l_Record_Present2Expansion_Delayed" &
       --  Range
       "#Low_Bound$High_Bound2Includes_Infinities" &
       --  Real_Literal
@@ -243,7 +245,8 @@ package Treeprs is
       --  Reference
       "%Prefix" &
       --  Selected_Component
-      "%Prefix$Selector_Name2Do_Access_Check4Do_Discriminant_Check" &
+      "%Prefix$Selector_Name&Associated_Node2Do_Access_Check4Do_Discriminant" &
+         "_Check" &
       --  Slice
       "%Prefix&Discrete_Range2Do_Access_Check" &
       --  String_Literal
@@ -597,199 +600,199 @@ package Treeprs is
       N_Defining_Identifier                    => 317,
       N_Defining_Operator_Symbol               => 335,
       N_Expanded_Name                          => 353,
-      N_Identifier                             => 412,
-      N_Operator_Symbol                        => 472,
-      N_Character_Literal                      => 503,
-      N_Op_Add                                 => 546,
-      N_Op_Concat                              => 546,
-      N_Op_Divide                              => 593,
-      N_Op_Expon                               => 649,
-      N_Op_Mod                                 => 673,
-      N_Op_Multiply                            => 714,
-      N_Op_Rem                                 => 752,
-      N_Op_Subtract                            => 793,
-      N_Op_And                                 => 793,
-      N_Op_Eq                                  => 809,
-      N_Op_Ge                                  => 809,
-      N_Op_Gt                                  => 809,
-      N_Op_Le                                  => 809,
-      N_Op_Lt                                  => 809,
-      N_Op_Ne                                  => 809,
-      N_Op_Or                                  => 809,
-      N_Op_Xor                                 => 825,
-      N_Op_Rotate_Left                         => 841,
-      N_Op_Rotate_Right                        => 856,
-      N_Op_Shift_Left                          => 871,
-      N_Op_Shift_Right                         => 886,
-      N_Op_Shift_Right_Arithmetic              => 901,
-      N_Op_Abs                                 => 916,
-      N_Op_Minus                               => 916,
-      N_Op_Not                                 => 916,
-      N_Op_Plus                                => 916,
-      N_Attribute_Reference                    => 916,
-      N_And_Then                               => 1019,
-      N_Conditional_Expression                 => 1027,
-      N_Explicit_Dereference                   => 1065,
-      N_Function_Call                          => 1088,
-      N_In                                     => 1209,
-      N_Indexed_Component                      => 1209,
-      N_Integer_Literal                        => 1244,
-      N_Not_In                                 => 1264,
-      N_Null                                   => 1264,
-      N_Or_Else                                => 1264,
-      N_Procedure_Call_Statement               => 1272,
-      N_Qualified_Expression                   => 1393,
-      N_Raise_Constraint_Error                 => 1417,
-      N_Raise_Program_Error                    => 1427,
-      N_Raise_Storage_Error                    => 1437,
-      N_Aggregate                              => 1447,
-      N_Allocator                              => 1587,
-      N_Extension_Aggregate                    => 1664,
-      N_Range                                  => 1751,
-      N_Real_Literal                           => 1792,
-      N_Reference                              => 1846,
-      N_Selected_Component                     => 1853,
-      N_Slice                                  => 1912,
-      N_String_Literal                         => 1950,
-      N_Subprogram_Info                        => 1976,
-      N_Type_Conversion                        => 1987,
-      N_Unchecked_Expression                   => 2102,
-      N_Unchecked_Type_Conversion              => 2113,
-      N_Subtype_Indication                     => 2154,
-      N_Component_Declaration                  => 2194,
-      N_Entry_Declaration                      => 2278,
-      N_Formal_Object_Declaration              => 2351,
-      N_Formal_Type_Declaration                => 2436,
-      N_Full_Type_Declaration                  => 2537,
-      N_Incomplete_Type_Declaration            => 2625,
-      N_Loop_Parameter_Specification           => 2703,
-      N_Object_Declaration                     => 2767,
-      N_Protected_Type_Declaration             => 3014,
-      N_Private_Extension_Declaration          => 3102,
-      N_Private_Type_Declaration               => 3216,
-      N_Subtype_Declaration                    => 3342,
-      N_Function_Specification                 => 3416,
-      N_Procedure_Specification                => 3508,
-      N_Entry_Index_Specification              => 3587,
-      N_Freeze_Entity                          => 3635,
-      N_Access_Function_Definition             => 3703,
-      N_Access_Procedure_Definition            => 3759,
-      N_Task_Type_Declaration                  => 3802,
-      N_Package_Body_Stub                      => 3905,
-      N_Protected_Body_Stub                    => 3957,
-      N_Subprogram_Body_Stub                   => 4009,
-      N_Task_Body_Stub                         => 4055,
-      N_Function_Instantiation                 => 4107,
-      N_Package_Instantiation                  => 4193,
-      N_Procedure_Instantiation                => 4279,
-      N_Package_Body                           => 4365,
-      N_Subprogram_Body                        => 4463,
-      N_Protected_Body                         => 4690,
-      N_Task_Body                              => 4772,
-      N_Implicit_Label_Declaration             => 4910,
-      N_Package_Declaration                    => 4946,
-      N_Single_Task_Declaration                => 5015,
-      N_Subprogram_Declaration                 => 5051,
-      N_Use_Package_Clause                     => 5111,
-      N_Generic_Package_Declaration            => 5154,
-      N_Generic_Subprogram_Declaration         => 5251,
-      N_Constrained_Array_Definition           => 5324,
-      N_Unconstrained_Array_Definition         => 5388,
-      N_Exception_Renaming_Declaration         => 5437,
-      N_Object_Renaming_Declaration            => 5462,
-      N_Package_Renaming_Declaration           => 5534,
-      N_Subprogram_Renaming_Declaration        => 5570,
-      N_Generic_Function_Renaming_Declaration  => 5620,
-      N_Generic_Package_Renaming_Declaration   => 5656,
-      N_Generic_Procedure_Renaming_Declaration => 5692,
-      N_Abort_Statement                        => 5728,
-      N_Accept_Statement                       => 5734,
-      N_Assignment_Statement                   => 5829,
-      N_Asynchronous_Select                    => 5915,
-      N_Block_Statement                        => 5953,
-      N_Case_Statement                         => 6118,
-      N_Code_Statement                         => 6151,
-      N_Conditional_Entry_Call                 => 6162,
-      N_Delay_Relative_Statement               => 6201,
-      N_Delay_Until_Statement                  => 6212,
-      N_Entry_Call_Statement                   => 6223,
-      N_Free_Statement                         => 6270,
-      N_Goto_Statement                         => 6312,
-      N_Loop_Statement                         => 6332,
-      N_Null_Statement                         => 6404,
-      N_Raise_Statement                        => 6404,
-      N_Requeue_Statement                      => 6409,
-      N_Return_Statement                       => 6428,
-      N_Selective_Accept                       => 6502,
-      N_Timed_Entry_Call                       => 6538,
-      N_Exit_Statement                         => 6579,
-      N_If_Statement                           => 6594,
-      N_Accept_Alternative                     => 6657,
-      N_Delay_Alternative                      => 6733,
-      N_Elsif_Part                             => 6785,
-      N_Entry_Body_Formal_Part                 => 6829,
-      N_Iteration_Scheme                       => 6890,
-      N_Terminate_Alternative                  => 6947,
-      N_Abortable_Part                         => 6986,
-      N_Abstract_Subprogram_Declaration        => 6997,
-      N_Access_Definition                      => 7011,
-      N_Access_To_Object_Definition            => 7024,
-      N_Case_Statement_Alternative             => 7072,
-      N_Compilation_Unit                       => 7100,
-      N_Compilation_Unit_Aux                   => 7239,
-      N_Component_Association                  => 7274,
-      N_Component_List                         => 7306,
-      N_Derived_Type_Definition                => 7348,
-      N_Decimal_Fixed_Point_Definition         => 7406,
-      N_Defining_Program_Unit_Name             => 7466,
-      N_Delta_Constraint                       => 7491,
-      N_Designator                             => 7525,
-      N_Digits_Constraint                      => 7541,
-      N_Discriminant_Association               => 7576,
-      N_Discriminant_Specification             => 7602,
-      N_Enumeration_Type_Definition            => 7669,
-      N_Entry_Body                             => 7678,
-      N_Entry_Call_Alternative                 => 7785,
-      N_Exception_Declaration                  => 7832,
-      N_Exception_Handler                      => 7881,
-      N_Floating_Point_Definition              => 7946,
-      N_Formal_Decimal_Fixed_Point_Definition  => 7989,
-      N_Formal_Derived_Type_Definition         => 7989,
-      N_Formal_Discrete_Type_Definition        => 8035,
-      N_Formal_Floating_Point_Definition       => 8035,
-      N_Formal_Modular_Type_Definition         => 8035,
-      N_Formal_Ordinary_Fixed_Point_Definition => 8035,
-      N_Formal_Package_Declaration             => 8035,
-      N_Formal_Private_Type_Definition         => 8122,
-      N_Formal_Signed_Integer_Type_Definition  => 8170,
-      N_Formal_Subprogram_Declaration          => 8170,
-      N_Generic_Association                    => 8209,
-      N_Handled_Sequence_Of_Statements         => 8257,
-      N_Index_Or_Discriminant_Constraint       => 8349,
-      N_Itype_Reference                        => 8361,
-      N_Label                                  => 8367,
-      N_Modular_Type_Definition                => 8393,
-      N_Number_Declaration                     => 8404,
-      N_Ordinary_Fixed_Point_Definition        => 8453,
-      N_Others_Choice                          => 8495,
-      N_Package_Specification                  => 8530,
-      N_Parameter_Association                  => 8616,
-      N_Parameter_Specification                => 8674,
-      N_Protected_Definition                   => 8803,
-      N_Range_Constraint                       => 8875,
-      N_Real_Range_Specification               => 8892,
-      N_Record_Definition                      => 8913,
-      N_Signed_Integer_Type_Definition         => 8999,
-      N_Single_Protected_Declaration           => 9020,
-      N_Subunit                                => 9061,
-      N_Task_Definition                        => 9097,
-      N_Triggering_Alternative                 => 9235,
-      N_Use_Type_Clause                        => 9282,
-      N_Validate_Unchecked_Conversion          => 9333,
-      N_Variant                                => 9357,
-      N_Variant_Part                           => 9436,
-      N_With_Clause                            => 9450,
-      N_With_Type_Clause                       => 9625,
-      N_Unused_At_End                          => 9645);
+      N_Identifier                             => 428,
+      N_Operator_Symbol                        => 504,
+      N_Character_Literal                      => 551,
+      N_Op_Add                                 => 610,
+      N_Op_Concat                              => 610,
+      N_Op_Divide                              => 657,
+      N_Op_Expon                               => 713,
+      N_Op_Mod                                 => 737,
+      N_Op_Multiply                            => 778,
+      N_Op_Rem                                 => 816,
+      N_Op_Subtract                            => 857,
+      N_Op_And                                 => 857,
+      N_Op_Eq                                  => 873,
+      N_Op_Ge                                  => 873,
+      N_Op_Gt                                  => 873,
+      N_Op_Le                                  => 873,
+      N_Op_Lt                                  => 873,
+      N_Op_Ne                                  => 873,
+      N_Op_Or                                  => 873,
+      N_Op_Xor                                 => 889,
+      N_Op_Rotate_Left                         => 905,
+      N_Op_Rotate_Right                        => 920,
+      N_Op_Shift_Left                          => 935,
+      N_Op_Shift_Right                         => 950,
+      N_Op_Shift_Right_Arithmetic              => 965,
+      N_Op_Abs                                 => 980,
+      N_Op_Minus                               => 980,
+      N_Op_Not                                 => 980,
+      N_Op_Plus                                => 980,
+      N_Attribute_Reference                    => 980,
+      N_And_Then                               => 1099,
+      N_Conditional_Expression                 => 1107,
+      N_Explicit_Dereference                   => 1145,
+      N_Function_Call                          => 1168,
+      N_In                                     => 1289,
+      N_Indexed_Component                      => 1289,
+      N_Integer_Literal                        => 1324,
+      N_Not_In                                 => 1344,
+      N_Null                                   => 1344,
+      N_Or_Else                                => 1344,
+      N_Procedure_Call_Statement               => 1352,
+      N_Qualified_Expression                   => 1473,
+      N_Raise_Constraint_Error                 => 1497,
+      N_Raise_Program_Error                    => 1507,
+      N_Raise_Storage_Error                    => 1517,
+      N_Aggregate                              => 1527,
+      N_Allocator                              => 1683,
+      N_Extension_Aggregate                    => 1760,
+      N_Range                                  => 1863,
+      N_Real_Literal                           => 1904,
+      N_Reference                              => 1958,
+      N_Selected_Component                     => 1965,
+      N_Slice                                  => 2040,
+      N_String_Literal                         => 2078,
+      N_Subprogram_Info                        => 2104,
+      N_Type_Conversion                        => 2115,
+      N_Unchecked_Expression                   => 2230,
+      N_Unchecked_Type_Conversion              => 2241,
+      N_Subtype_Indication                     => 2282,
+      N_Component_Declaration                  => 2322,
+      N_Entry_Declaration                      => 2406,
+      N_Formal_Object_Declaration              => 2479,
+      N_Formal_Type_Declaration                => 2564,
+      N_Full_Type_Declaration                  => 2665,
+      N_Incomplete_Type_Declaration            => 2753,
+      N_Loop_Parameter_Specification           => 2831,
+      N_Object_Declaration                     => 2895,
+      N_Protected_Type_Declaration             => 3142,
+      N_Private_Extension_Declaration          => 3230,
+      N_Private_Type_Declaration               => 3344,
+      N_Subtype_Declaration                    => 3470,
+      N_Function_Specification                 => 3544,
+      N_Procedure_Specification                => 3636,
+      N_Entry_Index_Specification              => 3715,
+      N_Freeze_Entity                          => 3763,
+      N_Access_Function_Definition             => 3831,
+      N_Access_Procedure_Definition            => 3887,
+      N_Task_Type_Declaration                  => 3930,
+      N_Package_Body_Stub                      => 4033,
+      N_Protected_Body_Stub                    => 4085,
+      N_Subprogram_Body_Stub                   => 4137,
+      N_Task_Body_Stub                         => 4183,
+      N_Function_Instantiation                 => 4235,
+      N_Package_Instantiation                  => 4321,
+      N_Procedure_Instantiation                => 4407,
+      N_Package_Body                           => 4493,
+      N_Subprogram_Body                        => 4591,
+      N_Protected_Body                         => 4818,
+      N_Task_Body                              => 4900,
+      N_Implicit_Label_Declaration             => 5038,
+      N_Package_Declaration                    => 5074,
+      N_Single_Task_Declaration                => 5143,
+      N_Subprogram_Declaration                 => 5179,
+      N_Use_Package_Clause                     => 5239,
+      N_Generic_Package_Declaration            => 5282,
+      N_Generic_Subprogram_Declaration         => 5379,
+      N_Constrained_Array_Definition           => 5452,
+      N_Unconstrained_Array_Definition         => 5516,
+      N_Exception_Renaming_Declaration         => 5565,
+      N_Object_Renaming_Declaration            => 5590,
+      N_Package_Renaming_Declaration           => 5662,
+      N_Subprogram_Renaming_Declaration        => 5698,
+      N_Generic_Function_Renaming_Declaration  => 5748,
+      N_Generic_Package_Renaming_Declaration   => 5784,
+      N_Generic_Procedure_Renaming_Declaration => 5820,
+      N_Abort_Statement                        => 5856,
+      N_Accept_Statement                       => 5862,
+      N_Assignment_Statement                   => 5957,
+      N_Asynchronous_Select                    => 6043,
+      N_Block_Statement                        => 6081,
+      N_Case_Statement                         => 6246,
+      N_Code_Statement                         => 6279,
+      N_Conditional_Entry_Call                 => 6290,
+      N_Delay_Relative_Statement               => 6329,
+      N_Delay_Until_Statement                  => 6340,
+      N_Entry_Call_Statement                   => 6351,
+      N_Free_Statement                         => 6398,
+      N_Goto_Statement                         => 6440,
+      N_Loop_Statement                         => 6460,
+      N_Null_Statement                         => 6532,
+      N_Raise_Statement                        => 6532,
+      N_Requeue_Statement                      => 6537,
+      N_Return_Statement                       => 6556,
+      N_Selective_Accept                       => 6630,
+      N_Timed_Entry_Call                       => 6666,
+      N_Exit_Statement                         => 6707,
+      N_If_Statement                           => 6722,
+      N_Accept_Alternative                     => 6785,
+      N_Delay_Alternative                      => 6861,
+      N_Elsif_Part                             => 6913,
+      N_Entry_Body_Formal_Part                 => 6957,
+      N_Iteration_Scheme                       => 7018,
+      N_Terminate_Alternative                  => 7075,
+      N_Abortable_Part                         => 7114,
+      N_Abstract_Subprogram_Declaration        => 7125,
+      N_Access_Definition                      => 7139,
+      N_Access_To_Object_Definition            => 7152,
+      N_Case_Statement_Alternative             => 7200,
+      N_Compilation_Unit                       => 7228,
+      N_Compilation_Unit_Aux                   => 7367,
+      N_Component_Association                  => 7402,
+      N_Component_List                         => 7434,
+      N_Derived_Type_Definition                => 7476,
+      N_Decimal_Fixed_Point_Definition         => 7534,
+      N_Defining_Program_Unit_Name             => 7594,
+      N_Delta_Constraint                       => 7619,
+      N_Designator                             => 7653,
+      N_Digits_Constraint                      => 7669,
+      N_Discriminant_Association               => 7704,
+      N_Discriminant_Specification             => 7730,
+      N_Enumeration_Type_Definition            => 7797,
+      N_Entry_Body                             => 7806,
+      N_Entry_Call_Alternative                 => 7913,
+      N_Exception_Declaration                  => 7960,
+      N_Exception_Handler                      => 8009,
+      N_Floating_Point_Definition              => 8074,
+      N_Formal_Decimal_Fixed_Point_Definition  => 8117,
+      N_Formal_Derived_Type_Definition         => 8117,
+      N_Formal_Discrete_Type_Definition        => 8163,
+      N_Formal_Floating_Point_Definition       => 8163,
+      N_Formal_Modular_Type_Definition         => 8163,
+      N_Formal_Ordinary_Fixed_Point_Definition => 8163,
+      N_Formal_Package_Declaration             => 8163,
+      N_Formal_Private_Type_Definition         => 8250,
+      N_Formal_Signed_Integer_Type_Definition  => 8298,
+      N_Formal_Subprogram_Declaration          => 8298,
+      N_Generic_Association                    => 8337,
+      N_Handled_Sequence_Of_Statements         => 8385,
+      N_Index_Or_Discriminant_Constraint       => 8477,
+      N_Itype_Reference                        => 8489,
+      N_Label                                  => 8495,
+      N_Modular_Type_Definition                => 8521,
+      N_Number_Declaration                     => 8532,
+      N_Ordinary_Fixed_Point_Definition        => 8581,
+      N_Others_Choice                          => 8623,
+      N_Package_Specification                  => 8658,
+      N_Parameter_Association                  => 8744,
+      N_Parameter_Specification                => 8802,
+      N_Protected_Definition                   => 8931,
+      N_Range_Constraint                       => 9003,
+      N_Real_Range_Specification               => 9020,
+      N_Record_Definition                      => 9041,
+      N_Signed_Integer_Type_Definition         => 9127,
+      N_Single_Protected_Declaration           => 9148,
+      N_Subunit                                => 9189,
+      N_Task_Definition                        => 9225,
+      N_Triggering_Alternative                 => 9363,
+      N_Use_Type_Clause                        => 9410,
+      N_Validate_Unchecked_Conversion          => 9461,
+      N_Variant                                => 9485,
+      N_Variant_Part                           => 9564,
+      N_With_Clause                            => 9578,
+      N_With_Type_Clause                       => 9753,
+      N_Unused_At_End                          => 9773);
 
 end Treeprs;