home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gnat-2.06-src.tgz / tar.out / fsf / gnat / ada / a-sinfo.h < prev    next >
Text File  |  1996-09-28  |  30KB  |  701 lines
  1. /*--------------------------------------------------------------------------*/
  2. /*                                                                          */
  3. /*                         GNAT COMPILER COMPONENTS                         */
  4. /*                                                                          */
  5. /*                                S I N F O                                 */
  6. /*                                                                          */
  7. /*                              C Header File                               */
  8. /*                                                                          */
  9. /*                 Generated by xsinfo revision 1.13 using                  */
  10. /*                         sinfo.ads revision 1.254                         */
  11. /*                                                                          */
  12. /*        Copyright (c) 1992,1993,1994,1995 NYU, All Rights Reserved        */
  13. /*                                                                          */
  14. /* The GNAT library is free software; you can redistribute it and/or modify */
  15. /* it under terms of the GNU Library General Public License as published by */
  16. /* the Free Software  Foundation; either version 2, or (at your option) any */
  17. /* later version.  The GNAT library is distributed in the hope that it will */
  18. /* be useful, but WITHOUT ANY WARRANTY;  without even  the implied warranty */
  19. /* of MERCHANTABILITY  or  FITNESS FOR  A PARTICULAR PURPOSE.  See the  GNU */
  20. /* Library  General  Public  License for  more  details.  You  should  have */
  21. /* received  a copy of the GNU  Library  General Public License  along with */
  22. /* the GNAT library;  see the file  COPYING.LIB.  If not, write to the Free */
  23. /* Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.        */
  24. /*                                                                          */
  25. /*--------------------------------------------------------------------------*/
  26.  
  27.       #define N_Unused_At_Start 0
  28.       #define N_At_Clause 1
  29.       #define N_Component_Clause 2
  30.       #define N_Enumeration_Representation_Clause 3
  31.       #define N_Mod_Clause 4
  32.       #define N_Record_Representation_Clause 5
  33.       #define N_Attribute_Definition_Clause 6
  34.       #define N_Empty 7
  35.       #define N_Error 8
  36.       #define N_Pragma 9
  37.       #define N_Pragma_Argument_Association 10
  38.       #define N_Defining_Character_Literal 11
  39.       #define N_Defining_Identifier 12
  40.       #define N_Defining_Operator_Symbol 13
  41.       #define N_Interpretation 14
  42.       #define N_Expanded_Name 15
  43.       #define N_Identifier 16
  44.       #define N_Character_Literal 17
  45.       #define N_Operator_Symbol 18
  46.       #define N_Op_Add 19
  47.       #define N_Op_And 20
  48.       #define N_Op_Concat 21
  49.       #define N_Op_Divide 22
  50.       #define N_Op_Eq 23
  51.       #define N_Op_Expon 24
  52.       #define N_Op_Ge 25
  53.       #define N_Op_Gt 26
  54.       #define N_Op_Le 27
  55.       #define N_Op_Lt 28
  56.       #define N_Op_Mod 29
  57.       #define N_Op_Multiply 30
  58.       #define N_Op_Ne 31
  59.       #define N_Op_Or 32
  60.       #define N_Op_Rem 33
  61.       #define N_Op_Subtract 34
  62.       #define N_Op_Xor 35
  63.       #define N_Op_Rotate_Left 36
  64.       #define N_Op_Rotate_Right 37
  65.       #define N_Op_Shift_Left 38
  66.       #define N_Op_Shift_Right 39
  67.       #define N_Op_Shift_Right_Arithmetic 40
  68.       #define N_Op_Abs 41
  69.       #define N_Op_Minus 42
  70.       #define N_Op_Not 43
  71.       #define N_Op_Plus 44
  72.       #define N_Attribute_Reference 45
  73.       #define N_And_Then 46
  74.       #define N_Concat_Multiple 47
  75.       #define N_Conditional_Expression 48
  76.       #define N_Explicit_Dereference 49
  77.       #define N_Function_Call 50
  78.       #define N_In 51
  79.       #define N_Indexed_Component 52
  80.       #define N_Integer_Literal 53
  81.       #define N_Not_In 54
  82.       #define N_Null 55
  83.       #define N_Or_Else 56
  84.       #define N_Procedure_Call_Statement 57
  85.       #define N_Qualified_Expression 58
  86.       #define N_Raise_Constraint_Error 59
  87.       #define N_Range 60
  88.       #define N_Real_Literal 61
  89.       #define N_Selected_Component 62
  90.       #define N_Type_Conversion 63
  91.       #define N_Unchecked_Type_Conversion 64
  92.       #define N_Allocator 65
  93.       #define N_Aggregate 66
  94.       #define N_Expression_Actions 67
  95.       #define N_Extension_Aggregate 68
  96.       #define N_Reference 69
  97.       #define N_Slice 70
  98.       #define N_String_Literal 71
  99.       #define N_Subtype_Indication 72
  100.       #define N_Component_Declaration 73
  101.       #define N_Entry_Body 74
  102.       #define N_Entry_Declaration 75
  103.       #define N_Entry_Index_Specification 76
  104.       #define N_Formal_Object_Declaration 77
  105.       #define N_Formal_Type_Declaration 78
  106.       #define N_Freeze_Entity 79
  107.       #define N_Full_Type_Declaration 80
  108.       #define N_Incomplete_Type_Declaration 81
  109.       #define N_Implicit_Types 82
  110.       #define N_Loop_Parameter_Specification 83
  111.       #define N_Object_Declaration 84
  112.       #define N_Private_Extension_Declaration 85
  113.       #define N_Private_Type_Declaration 86
  114.       #define N_Subtype_Declaration 87
  115.       #define N_Protected_Type_Declaration 88
  116.       #define N_Accept_Statement 89
  117.       #define N_Function_Specification 90
  118.       #define N_Procedure_Specification 91
  119.       #define N_Access_Function_Definition 92
  120.       #define N_Access_Procedure_Definition 93
  121.       #define N_Task_Type_Declaration 94
  122.       #define N_Package_Body_Stub 95
  123.       #define N_Protected_Body_Stub 96
  124.       #define N_Subprogram_Body_Stub 97
  125.       #define N_Task_Body_Stub 98
  126.       #define N_Function_Instantiation 99
  127.       #define N_Package_Instantiation 100
  128.       #define N_Procedure_Instantiation 101
  129.       #define N_Package_Body 102
  130.       #define N_Subprogram_Body 103
  131.       #define N_Implicit_Label_Declaration 104
  132.       #define N_Package_Declaration 105
  133.       #define N_Single_Task_Declaration 106
  134.       #define N_Subprogram_Declaration 107
  135.       #define N_Task_Body 108
  136.       #define N_Use_Package_Clause 109
  137.       #define N_Generic_Package_Declaration 110
  138.       #define N_Generic_Subprogram_Declaration 111
  139.       #define N_Constrained_Array_Definition 112
  140.       #define N_Unconstrained_Array_Definition 113
  141.       #define N_Exception_Renaming_Declaration 114
  142.       #define N_Object_Renaming_Declaration 115
  143.       #define N_Package_Renaming_Declaration 116
  144.       #define N_Subprogram_Renaming_Declaration 117
  145.       #define N_Generic_Function_Renaming_Declaration 118
  146.       #define N_Generic_Package_Renaming_Declaration 119
  147.       #define N_Generic_Procedure_Renaming_Declaration 120
  148.       #define N_Abort_Statement 121
  149.       #define N_Assignment_Statement 122
  150.       #define N_Asynchronous_Select 123
  151.       #define N_Block_Statement 124
  152.       #define N_Case_Statement 125
  153.       #define N_Code_Statement 126
  154.       #define N_Conditional_Entry_Call 127
  155.       #define N_Delay_Relative_Statement 128
  156.       #define N_Delay_Until_Statement 129
  157.       #define N_Entry_Call_Statement 130
  158.       #define N_Exit_Statement 131
  159.       #define N_Free_Statement 132
  160.       #define N_Goto_Statement 133
  161.       #define N_If_Statement 134
  162.       #define N_Loop_Statement 135
  163.       #define N_Null_Statement 136
  164.       #define N_Raise_Statement 137
  165.       #define N_Requeue_Statement 138
  166.       #define N_Return_Statement 139
  167.       #define N_Selective_Accept 140
  168.       #define N_Timed_Entry_Call 141
  169.       #define N_Abortable_Part 142
  170.       #define N_Abstract_Subprogram_Declaration 143
  171.       #define N_Accept_Alternative 144
  172.       #define N_Access_Definition 145
  173.       #define N_Access_To_Object_Definition 146
  174.       #define N_Case_Statement_Alternative 147
  175.       #define N_Compilation_Unit 148
  176.       #define N_Component_Association 149
  177.       #define N_Component_List 150
  178.       #define N_Derived_Type_Definition 151
  179.       #define N_Decimal_Fixed_Point_Definition 152
  180.       #define N_Defining_Program_Unit_Name 153
  181.       #define N_Delay_Alternative 154
  182.       #define N_Delta_Constraint 155
  183.       #define N_Designator 156
  184.       #define N_Digits_Constraint 157
  185.       #define N_Discriminant_Association 158
  186.       #define N_Discriminant_Specification 159
  187.       #define N_Elsif_Part 160
  188.       #define N_Enumeration_Type_Definition 161
  189.       #define N_Entry_Body_Formal_Part 162
  190.       #define N_Entry_Call_Alternative 163
  191.       #define N_Exception_Declaration 164
  192.       #define N_Exception_Handler 165
  193.       #define N_Floating_Point_Definition 166
  194.       #define N_Formal_Decimal_Fixed_Point_Definition 167
  195.       #define N_Formal_Derived_Type_Definition 168
  196.       #define N_Formal_Discrete_Type_Definition 169
  197.       #define N_Formal_Floating_Point_Definition 170
  198.       #define N_Formal_Modular_Type_Definition 171
  199.       #define N_Formal_Ordinary_Fixed_Point_Definition 172
  200.       #define N_Formal_Package_Declaration 173
  201.       #define N_Formal_Private_Type_Definition 174
  202.       #define N_Formal_Signed_Integer_Type_Definition 175
  203.       #define N_Formal_Subprogram_Declaration 176
  204.       #define N_Generic_Association 177
  205.       #define N_Handled_Sequence_Of_Statements 178
  206.       #define N_Index_Or_Discriminant_Constraint 179
  207.       #define N_Iteration_Scheme 180
  208.       #define N_Label 181
  209.       #define N_Modular_Type_Definition 182
  210.       #define N_Number_Declaration 183
  211.       #define N_Ordinary_Fixed_Point_Definition 184
  212.       #define N_Others_Choice 185
  213.       #define N_Package_Specification 186
  214.       #define N_Parameter_Association 187
  215.       #define N_Parameter_Specification 188
  216.       #define N_Protected_Body 189
  217.       #define N_Protected_Definition 190
  218.       #define N_Range_Constraint 191
  219.       #define N_Real_Range_Specification 192
  220.       #define N_Record_Definition 193
  221.       #define N_Signed_Integer_Type_Definition 194
  222.       #define N_Single_Protected_Declaration 195
  223.       #define N_Subunit 196
  224.       #define N_Task_Definition 197
  225.       #define N_Terminate_Alternative 198
  226.       #define N_Triggering_Alternative 199
  227.       #define N_Use_Type_Clause 200
  228.       #define N_Variant 201
  229.       #define N_Variant_Part 202
  230.       #define N_With_Clause 203
  231.       #define N_Unused_At_End 204
  232.  
  233.       #define Number_Node_Kinds 205
  234.    SUBTYPE (N_Access_To_Subprogram_Definition, Node_Kind, 
  235.       N_Access_Function_Definition,
  236.       N_Access_Procedure_Definition)
  237.    SUBTYPE (N_Array_Type_Definition, Node_Kind, 
  238.       N_Constrained_Array_Definition,
  239.       N_Unconstrained_Array_Definition)
  240.    SUBTYPE (N_Binary_Op, Node_Kind, 
  241.       N_Op_Add,
  242.       N_Op_Shift_Right_Arithmetic)
  243.    SUBTYPE (N_Body_Stub, Node_Kind, 
  244.       N_Package_Body_Stub,
  245.       N_Task_Body_Stub)
  246.    SUBTYPE (N_Direct_Name, Node_Kind, 
  247.       N_Identifier,
  248.       N_Operator_Symbol)
  249.    SUBTYPE (N_Entity, Node_Kind, 
  250.       N_Defining_Character_Literal,
  251.       N_Defining_Operator_Symbol)
  252.    SUBTYPE (N_Generic_Declaration, Node_Kind, 
  253.       N_Generic_Package_Declaration,
  254.       N_Generic_Subprogram_Declaration)
  255.    SUBTYPE (N_Generic_Instantiation, Node_Kind, 
  256.       N_Function_Instantiation,
  257.       N_Procedure_Instantiation)
  258.    SUBTYPE (N_Generic_Renaming_Declaration, Node_Kind, 
  259.       N_Generic_Function_Renaming_Declaration,
  260.       N_Generic_Procedure_Renaming_Declaration)
  261.    SUBTYPE (N_Has_Chars, Node_Kind, 
  262.       N_Attribute_Definition_Clause,
  263.       N_Op_Plus)
  264.    SUBTYPE (N_Has_Etype, Node_Kind, 
  265.       N_Defining_Character_Literal,
  266.       N_Subtype_Indication)
  267.    SUBTYPE (N_Has_Itypes, Node_Kind, 
  268.       N_Allocator,
  269.       N_Task_Type_Declaration)
  270.    SUBTYPE (N_Op_Shift, Node_Kind, 
  271.       N_Op_Rotate_Left,
  272.       N_Op_Shift_Right_Arithmetic)
  273.    SUBTYPE (N_Later_Decl_Item, Node_Kind, 
  274.       N_Package_Body_Stub, N_Generic_Subprogram_Declaration)
  275.    SUBTYPE (N_Op, Node_Kind, 
  276.       N_Op_Add,
  277.       N_Op_Plus)
  278.    SUBTYPE (N_Renaming_Declaration, Node_Kind, 
  279.       N_Exception_Renaming_Declaration,
  280.       N_Generic_Procedure_Renaming_Declaration)
  281.    SUBTYPE (N_Representation_Clause, Node_Kind, 
  282.       N_At_Clause,
  283.       N_Attribute_Definition_Clause)
  284.    SUBTYPE (N_Statement, Node_Kind, 
  285.       N_Abort_Statement,
  286.       N_Timed_Entry_Call)
  287.    SUBTYPE (N_Subexpr, Node_Kind, 
  288.       N_Expanded_Name,
  289.       N_String_Literal)
  290.    SUBTYPE (N_Subexpr_Has_Entity, Node_Kind, 
  291.       N_Expanded_Name,
  292.       N_Attribute_Reference)
  293.    SUBTYPE (N_Subprogram_Specification, Node_Kind, 
  294.       N_Function_Specification,
  295.       N_Procedure_Specification)
  296.    SUBTYPE (N_Unary_Op, Node_Kind, 
  297.       N_Op_Abs,
  298.       N_Op_Plus)
  299.    SUBTYPE (N_Unit_Body, Node_Kind, 
  300.       N_Package_Body,
  301.       N_Subprogram_Body)
  302.    INLINE Boolean   Abort_Present                  (Node_Id N)
  303.       { return Flag1 (N); }
  304.    INLINE Node_Id   Abortable_Part                 (Node_Id N)
  305.       { return Node2 (N); }
  306.    INLINE Boolean   Abstract_Present               (Node_Id N)
  307.       { return Flag4 (N); }
  308.    INLINE Node_Id   Accept_Statement               (Node_Id N)
  309.       { return Node2 (N); }
  310.    INLINE List_Id   Actions                        (Node_Id N)
  311.       { return List1 (N); }
  312.    INLINE Node_Id   Activation_Chain_Entity        (Node_Id N)
  313.       { return Node2 (N); }
  314.    INLINE Boolean   Acts_As_Spec                   (Node_Id N)
  315.       { return Flag4 (N); }
  316.    INLINE Node_Id   Aggregate_Bounds               (Node_Id N)
  317.       { return Node3 (N); }
  318.    INLINE Boolean   Aliased_Present                (Node_Id N)
  319.       { return Flag1 (N); }
  320.    INLINE Boolean   All_Present                    (Node_Id N)
  321.       { return Flag1 (N); }
  322.    INLINE List_Id   Alternatives                   (Node_Id N)
  323.       { return List4 (N); }
  324.    INLINE Boolean   Analyzed                       (Node_Id N)
  325.       { return Flag15 (N); }
  326.    INLINE Node_Id   Ancestor_Part                  (Node_Id N)
  327.       { return Node3 (N); }
  328.    INLINE Node_Id   Array_Aggregate                (Node_Id N)
  329.       { return Node4 (N); }
  330.    INLINE Boolean   Assignment_OK                  (Node_Id N)
  331.       { return Flag1 (N); }
  332.    INLINE Name_Id   Attribute_Name                 (Node_Id N)
  333.       { return Name2 (N); }
  334.    INLINE Boolean   Backwards_OK                   (Node_Id N)
  335.       { return Flag6 (N); }
  336.    INLINE Boolean   Bad_Is_Detected                (Node_Id N)
  337.       { return Flag1 (N); }
  338.    INLINE Boolean   Body_Required                  (Node_Id N)
  339.       { return Flag3 (N); }
  340.    INLINE Boolean   Box_Present                    (Node_Id N)
  341.       { return Flag1 (N); }
  342.    INLINE Boolean   Cannot_Be_Constant             (Node_Id N)
  343.       { return Flag18 (N); }
  344.    INLINE Char_Code Char_Literal_Value             (Node_Id N)
  345.       { return Char_Code2 (N); }
  346.    INLINE Name_Id   Chars                          (Node_Id N)
  347.       { return Name1 (N); }
  348.    INLINE Node_Id   Choice_Parameter               (Node_Id N)
  349.       { return Node2 (N); }
  350.    INLINE List_Id   Choices                        (Node_Id N)
  351.       { return List1 (N); }
  352.    INLINE Node_Id   Cleanup_Call                   (Node_Id N)
  353.       { return Node5 (N); }
  354.    INLINE List_Id   Component_Associations         (Node_Id N)
  355.       { return List4 (N); }
  356.    INLINE List_Id   Component_Clauses              (Node_Id N)
  357.       { return List3 (N); }
  358.    INLINE List_Id   Component_Items                (Node_Id N)
  359.       { return List3 (N); }
  360.    INLINE Node_Id   Component_List                 (Node_Id N)
  361.       { return Node1 (N); }
  362.    INLINE Node_Id   Component_Name                 (Node_Id N)
  363.       { return Node1 (N); }
  364.    INLINE Node_Id   Condition                      (Node_Id N)
  365.       { return Node5 (N); }
  366.    INLINE List_Id   Condition_Actions              (Node_Id N)
  367.       { return List3 (N); }
  368.    INLINE Boolean   Constant_Present               (Node_Id N)
  369.       { return Flag17 (N); }
  370.    INLINE Node_Id   Constraint                     (Node_Id N)
  371.       { return Node3 (N); }
  372.    INLINE List_Id   Constraints                    (Node_Id N)
  373.       { return List1 (N); }
  374.    INLINE Boolean   Context_Installed              (Node_Id N)
  375.       { return Flag3 (N); }
  376.    INLINE List_Id   Context_Items                  (Node_Id N)
  377.       { return List1 (N); }
  378.    INLINE Node_Id   Controlling_Argument           (Node_Id N)
  379.       { return Node1 (N); }
  380.    INLINE Boolean   Conversion_OK                  (Node_Id N)
  381.       { return Flag14 (N); }
  382.    INLINE Node_Id   Corresponding_Body             (Node_Id N)
  383.       { return Node5 (N); }
  384.    INLINE Uint      Corresponding_Integer_Value    (Node_Id N)
  385.       { return Uint4 (N); }
  386.    INLINE Node_Id   Corresponding_Spec             (Node_Id N)
  387.       { return Node5 (N); }
  388.    INLINE Node_Id   Corresponding_Stub             (Node_Id N)
  389.       { return Node3 (N); }
  390.    INLINE Node_Id   Debug_Statement                (Node_Id N)
  391.       { return Node3 (N); }
  392.    INLINE List_Id   Declarations                   (Node_Id N)
  393.       { return List3 (N); }
  394.    INLINE Node_Id   Default_Name                   (Node_Id N)
  395.       { return Node2 (N); }
  396.    INLINE Entity_Id Defining_Identifier            (Node_Id N)
  397.       { return Node1 (N); }
  398.    INLINE Node_Id   Defining_Unit_Name             (Node_Id N)
  399.       { return Node1 (N); }
  400.    INLINE Node_Id   Delay_Alternative              (Node_Id N)
  401.       { return Node4 (N); }
  402.    INLINE Node_Id   Delay_Statement                (Node_Id N)
  403.       { return Node2 (N); }
  404.    INLINE Node_Id   Delta_Expression               (Node_Id N)
  405.       { return Node3 (N); }
  406.    INLINE Node_Id   Digits_Expression              (Node_Id N)
  407.       { return Node2 (N); }
  408.    INLINE List_Id   Discrete_Choices               (Node_Id N)
  409.       { return List4 (N); }
  410.    INLINE Node_Id   Discrete_Range                 (Node_Id N)
  411.       { return Node4 (N); }
  412.    INLINE Node_Id   Discrete_Subtype_Definition    (Node_Id N)
  413.       { return Node4 (N); }
  414.    INLINE List_Id   Discrete_Subtype_Definitions   (Node_Id N)
  415.       { return List2 (N); }
  416.    INLINE List_Id   Discriminant_Specifications    (Node_Id N)
  417.       { return List4 (N); }
  418.    INLINE Node_Id   Discriminant_Type              (Node_Id N)
  419.       { return Node2 (N); }
  420.    INLINE Boolean   Do_Access_Check                (Node_Id N)
  421.       { return Flag11 (N); }
  422.    INLINE Boolean   Do_Accessibility_Check         (Node_Id N)
  423.       { return Flag3 (N); }
  424.    INLINE Boolean   Do_Discriminant_Check          (Node_Id N)
  425.       { return Flag3 (N); }
  426.    INLINE Boolean   Do_Division_Check              (Node_Id N)
  427.       { return Flag3 (N); }
  428.    INLINE Boolean   Do_Length_Check                (Node_Id N)
  429.       { return Flag4 (N); }
  430.    INLINE Boolean   Do_Overflow_Check              (Node_Id N)
  431.       { return Flag17 (N); }
  432.    INLINE Boolean   Do_Range_Check                 (Node_Id N)
  433.       { return Flag9 (N); }
  434.    INLINE Boolean   Do_Storage_Check               (Node_Id N)
  435.       { return Flag17 (N); }
  436.    INLINE Boolean   Do_Tag_Check                   (Node_Id N)
  437.       { return Flag3 (N); }
  438.    INLINE Boolean   Elaborate_Present              (Node_Id N)
  439.       { return Flag4 (N); }
  440.    INLINE Boolean   Elaborate_All_Present          (Node_Id N)
  441.       { return Flag1 (N); }
  442.    INLINE Boolean   Elaborate_Body_Present         (Node_Id N)
  443.       { return Flag7 (N); }
  444.    INLINE List_Id   Else_Actions                   (Node_Id N)
  445.       { return List3 (N); }
  446.    INLINE List_Id   Else_Statements                (Node_Id N)
  447.       { return List4 (N); }
  448.    INLINE List_Id   Elsif_Parts                    (Node_Id N)
  449.       { return List3 (N); }
  450.    INLINE Node_Id   Enclosing_Variant              (Node_Id N)
  451.       { return Node2 (N); }
  452.    INLINE Node_Id   Entity                         (Node_Id N)
  453.       { return Node4 (N); }
  454.    INLINE Node_Id   Entry_Body_Formal_Part         (Node_Id N)
  455.       { return Node5 (N); }
  456.    INLINE Node_Id   Entry_Call_Alternative         (Node_Id N)
  457.       { return Node1 (N); }
  458.    INLINE Node_Id   Entry_Call_Statement           (Node_Id N)
  459.       { return Node1 (N); }
  460.    INLINE Node_Id   Entry_Direct_Name              (Node_Id N)
  461.       { return Node1 (N); }
  462.    INLINE Node_Id   Entry_Index                    (Node_Id N)
  463.       { return Node5 (N); }
  464.    INLINE Node_Id   Entry_Index_Specification      (Node_Id N)
  465.       { return Node1 (N); }
  466.    INLINE Boolean   Error_Posted                   (Node_Id N)
  467.       { return Flag13 (N); }
  468.    INLINE Node_Id   Etype                          (Node_Id N)
  469.       { return Node5 (N); }
  470.    INLINE List_Id   Exception_Choices              (Node_Id N)
  471.       { return List4 (N); }
  472.    INLINE List_Id   Exception_Handlers             (Node_Id N)
  473.       { return List4 (N); }
  474.    INLINE Node_Id   Explicit_Actual_Parameter      (Node_Id N)
  475.       { return Node3 (N); }
  476.    INLINE Node_Id   Explicit_Generic_Actual_Parameter (Node_Id N)
  477.       { return Node1 (N); }
  478.    INLINE Node_Id   Expression                     (Node_Id N)
  479.       { return Node3 (N); }
  480.    INLINE List_Id   Expressions                    (Node_Id N)
  481.       { return List1 (N); }
  482.    INLINE Node_Id   First_Bit                      (Node_Id N)
  483.       { return Node3 (N); }
  484.    INLINE Entity_Id First_Inlined_Subprogram       (Node_Id N)
  485.       { return Node5 (N); }
  486.    INLINE Entity_Id First_Itype                    (Node_Id N)
  487.       { return Node2 (N); }
  488.    INLINE Boolean   First_Name                     (Node_Id N)
  489.       { return Flag5 (N); }
  490.    INLINE Node_Id   First_Named_Actual             (Node_Id N)
  491.       { return Node4 (N); }
  492.    INLINE Node_Id   First_Real_Statement           (Node_Id N)
  493.       { return Node2 (N); }
  494.    INLINE Entity_Id First_Subtype_Link             (Node_Id N)
  495.       { return Node5 (N); }
  496.    INLINE Boolean   Float_Truncate                 (Node_Id N)
  497.       { return Flag11 (N); }
  498.    INLINE List_Id   Following_Pragmas              (Node_Id N)
  499.       { return List3 (N); }
  500.    INLINE Node_Id   Formal_Type_Definition         (Node_Id N)
  501.       { return Node3 (N); }
  502.    INLINE Boolean   Forwards_OK                    (Node_Id N)
  503.       { return Flag5 (N); }
  504.    INLINE List_Id   Generic_Associations           (Node_Id N)
  505.       { return List3 (N); }
  506.    INLINE List_Id   Generic_Formal_Declarations    (Node_Id N)
  507.       { return List3 (N); }
  508.    INLINE Node_Id   Generic_Parent                 (Node_Id N)
  509.       { return Node5 (N); }
  510.    INLINE Node_Id   Handled_Statement_Sequence     (Node_Id N)
  511.       { return Node4 (N); }
  512.    INLINE Boolean   Has_Created_Identifier         (Node_Id N)
  513.       { return Flag1 (N); }
  514.    INLINE Boolean   Has_Dynamic_Itype              (Node_Id N)
  515.       { return Flag14 (N); }
  516.    INLINE Boolean   Has_No_Elab_Code               (Node_Id N)
  517.       { return Flag17 (N); }
  518.    INLINE Boolean   Has_No_Side_Effects            (Node_Id N)
  519.       { return Flag8 (N); }
  520.    INLINE Boolean   Has_Priority_Pragma            (Node_Id N)
  521.       { return Flag6 (N); }
  522.    INLINE Boolean   Has_Private_View               (Node_Id N)
  523.       { return Flag11 (N); }
  524.    INLINE Boolean   Has_Storage_Size_Pragma        (Node_Id N)
  525.       { return Flag5 (N); }
  526.    INLINE Node_Id   High_Bound                     (Node_Id N)
  527.       { return Node2 (N); }
  528.    INLINE Node_Id   Homonym                        (Node_Id N)
  529.       { return Node4 (N); }
  530.    INLINE Node_Id   Identifier                     (Node_Id N)
  531.       { return Node1 (N); }
  532.    INLINE Boolean   Implicit_With                  (Node_Id N)
  533.       { return Flag17 (N); }
  534.    INLINE Boolean   In_Present                     (Node_Id N)
  535.       { return Flag1 (N); }
  536.    INLINE Uint      Intval                         (Node_Id N)
  537.       { return Uint3 (N); }
  538.    INLINE Boolean   Is_Controlling_Actual          (Node_Id N)
  539.       { return Flag16 (N); }
  540.    INLINE Boolean   Is_Current_Instance            (Node_Id N)
  541.       { return Flag14 (N); }
  542.    INLINE Boolean   Is_Overloaded                  (Node_Id N)
  543.       { return Flag5 (N); }
  544.    INLINE Boolean   Is_Static_Expression           (Node_Id N)
  545.       { return Flag6 (N); }
  546.    INLINE Boolean   Is_Task_Master                 (Node_Id N)
  547.       { return Flag5 (N); }
  548.    INLINE Node_Id   Iteration_Scheme               (Node_Id N)
  549.       { return Node2 (N); }
  550.    INLINE Node_Id   Left_Opnd                      (Node_Id N)
  551.       { return Node2 (N); }
  552.    INLINE Node_Id   Label                          (Node_Id N)
  553.       { return Node2 (N); }
  554.    INLINE Node_Id   Last_Bit                       (Node_Id N)
  555.       { return Node4 (N); }
  556.    INLINE Boolean   Last_Name                      (Node_Id N)
  557.       { return Flag6 (N); }
  558.    INLINE Node_Id   Library_Unit                   (Node_Id N)
  559.       { return Node4 (N); }
  560.    INLINE List_Id   Literals                       (Node_Id N)
  561.       { return List1 (N); }
  562.    INLINE Boolean   Limited_Present                (Node_Id N)
  563.       { return Flag17 (N); }
  564.    INLINE Node_Id   Loop_Parameter_Specification   (Node_Id N)
  565.       { return Node1 (N); }
  566.    INLINE Node_Id   Low_Bound                      (Node_Id N)
  567.       { return Node1 (N); }
  568.    INLINE Node_Id   Mod_Clause                     (Node_Id N)
  569.       { return Node2 (N); }
  570.    INLINE Boolean   More_Ids                       (Node_Id N)
  571.       { return Flag5 (N); }
  572.    INLINE Node_Id   Name                           (Node_Id N)
  573.       { return Node2 (N); }
  574.    INLINE List_Id   Names                          (Node_Id N)
  575.       { return List2 (N); }
  576.    INLINE Node_Id   Next_Entity                    (Node_Id N)
  577.       { return Node2 (N); }
  578.    INLINE Node_Id   Next_Interp                    (Node_Id N)
  579.       { return Node2 (N); }
  580.    INLINE Node_Id   Next_Named_Actual              (Node_Id N)
  581.       { return Node4 (N); }
  582.    INLINE Node_Id   Next_Use_Clause                (Node_Id N)
  583.       { return Node3 (N); }
  584.    INLINE Boolean   No_Default_Init                (Node_Id N)
  585.       { return Flag7 (N); }
  586.    INLINE Boolean   No_Defer                       (Node_Id N)
  587.       { return Flag1 (N); }
  588.    INLINE Boolean   Null_Present                   (Node_Id N)
  589.       { return Flag3 (N); }
  590.    INLINE Boolean   Null_Record_Present            (Node_Id N)
  591.       { return Flag17 (N); }
  592.    INLINE Node_Id   Object_Definition              (Node_Id N)
  593.       { return Node4 (N); }
  594.    INLINE Node_Id   Object_Definition_Itypes       (Node_Id N)
  595.       { return Node5 (N); }
  596.    INLINE List_Id   Others_Discrete_Choices        (Node_Id N)
  597.       { return List1 (N); }
  598.    INLINE Boolean   Out_Present                    (Node_Id N)
  599.       { return Flag17 (N); }
  600.    INLINE List_Id   Parameter_Associations         (Node_Id N)
  601.       { return List3 (N); }
  602.    INLINE List_Id   Parameter_Specifications       (Node_Id N)
  603.       { return List3 (N); }
  604.    INLINE Node_Id   Parameter_Type                 (Node_Id N)
  605.       { return Node2 (N); }
  606.    INLINE Node_Id   Parent_Spec                    (Node_Id N)
  607.       { return Node4 (N); }
  608.    INLINE Node_Id   Position                       (Node_Id N)
  609.       { return Node2 (N); }
  610.    INLINE List_Id   Pragma_Argument_Associations   (Node_Id N)
  611.       { return List2 (N); }
  612.    INLINE Node_Id   Prefix                         (Node_Id N)
  613.       { return Node3 (N); }
  614.    INLINE Boolean   Prev_Ids                       (Node_Id N)
  615.       { return Flag6 (N); }
  616.    INLINE List_Id   Private_Declarations           (Node_Id N)
  617.       { return List4 (N); }
  618.    INLINE Boolean   Private_Present                (Node_Id N)
  619.       { return Flag1 (N); }
  620.    INLINE Node_Id   Procedure_To_Call              (Node_Id N)
  621.       { return Node4 (N); }
  622.    INLINE Node_Id   Proper_Body                    (Node_Id N)
  623.       { return Node1 (N); }
  624.    INLINE Node_Id   Protected_Definition           (Node_Id N)
  625.       { return Node3 (N); }
  626.    INLINE Boolean   Protected_Present              (Node_Id N)
  627.       { return Flag1 (N); }
  628.    INLINE Boolean   Raises_Constraint_Error        (Node_Id N)
  629.       { return Flag7 (N); }
  630.    INLINE Node_Id   Range_Constraint               (Node_Id N)
  631.       { return Node4 (N); }
  632.    INLINE Node_Id   Range_Expression               (Node_Id N)
  633.       { return Node4 (N); }
  634.    INLINE Ureal     Realval                        (Node_Id N)
  635.       { return Ureal3 (N); }
  636.    INLINE Node_Id   Real_Range_Specification       (Node_Id N)
  637.       { return Node4 (N); }
  638.    INLINE Node_Id   Record_Extension_Part          (Node_Id N)
  639.       { return Node3 (N); }
  640.    INLINE Boolean   Redundant_Use                  (Node_Id N)
  641.       { return Flag3 (N); }
  642.    INLINE Node_Id   Return_Type                    (Node_Id N)
  643.       { return Node2 (N); }
  644.    INLINE Boolean   Reverse_Present                (Node_Id N)
  645.       { return Flag1 (N); }
  646.    INLINE Node_Id   Right_Opnd                     (Node_Id N)
  647.       { return Node3 (N); }
  648.    INLINE Boolean   Rounded_Result                 (Node_Id N)
  649.       { return Flag12 (N); }
  650.    INLINE Node_Id   Scope                          (Node_Id N)
  651.       { return Node3 (N); }
  652.    INLINE List_Id   Select_Alternatives            (Node_Id N)
  653.       { return List1 (N); }
  654.    INLINE Node_Id   Selector_Name                  (Node_Id N)
  655.       { return Node2 (N); }
  656.    INLINE List_Id   Selector_Names                 (Node_Id N)
  657.       { return List1 (N); }
  658.    INLINE Node_Id   Specification                  (Node_Id N)
  659.       { return Node1 (N); }
  660.    INLINE List_Id   Statements                     (Node_Id N)
  661.       { return List3 (N); }
  662.    INLINE Node_Id   Storage_Pool                   (Node_Id N)
  663.       { return Node1 (N); }
  664.    INLINE String_Id Strval                         (Node_Id N)
  665.       { return Str3 (N); }
  666.    INLINE Node_Id   Subtype_Indication             (Node_Id N)
  667.       { return Node5 (N); }
  668.    INLINE Node_Id   Subtype_Mark                   (Node_Id N)
  669.       { return Node4 (N); }
  670.    INLINE List_Id   Subtype_Marks                  (Node_Id N)
  671.       { return List2 (N); }
  672.    INLINE Boolean   Tagged_Present                 (Node_Id N)
  673.       { return Flag1 (N); }
  674.    INLINE Node_Id   Task_Definition                (Node_Id N)
  675.       { return Node3 (N); }
  676.    INLINE List_Id   Then_Actions                   (Node_Id N)
  677.       { return List2 (N); }
  678.    INLINE List_Id   Then_Statements                (Node_Id N)
  679.       { return List2 (N); }
  680.    INLINE Boolean   Treat_Fixed_As_Integer         (Node_Id N)
  681.       { return Flag14 (N); }
  682.    INLINE Node_Id   Triggering_Alternative         (Node_Id N)
  683.       { return Node1 (N); }
  684.    INLINE Node_Id   Triggering_Statement           (Node_Id N)
  685.       { return Node1 (N); }
  686.    INLINE Elist_Id  TSS_Elist                      (Node_Id N)
  687.       { return Elist3 (N); }
  688.    INLINE Node_Id   Type_Definition                (Node_Id N)
  689.       { return Node3 (N); }
  690.    INLINE Node_Id   Unit                           (Node_Id N)
  691.       { return Node2 (N); }
  692.    INLINE Boolean   Unknown_Discriminants_Present  (Node_Id N)
  693.       { return Flag3 (N); }
  694.    INLINE Node_Id   Variant_Part                   (Node_Id N)
  695.       { return Node4 (N); }
  696.    INLINE List_Id   Variants                       (Node_Id N)
  697.       { return List1 (N); }
  698.    INLINE List_Id   Visible_Declarations           (Node_Id N)
  699.       { return List2 (N); }
  700.  
  701.