gcc/ada/rtsfind.ads

   1 ------------------------------------------------------------------------------
   2 --                                                                          --
   3 --                         GNAT COMPILER COMPONENTS                         --
   4 --                                                                          --
   5 --                              R T S F I N D                               --
   6 --                                                                          --
   7 --                                 S p e c                                  --
   8 --                                                                          --
   9 --          Copyright (C) 1992-2003, Free Software Foundation, Inc.         --
  10 --                                                                          --
  11 -- GNAT is free software;  you can  redistribute it  and/or modify it under --
  12 -- terms of the  GNU General Public License as published  by the Free Soft- --
  13 -- ware  Foundation;  either version 2,  or (at your option) any later ver- --
  14 -- sion.  GNAT is distributed in the hope that it will be useful, but WITH- --
  15 -- OUT ANY WARRANTY;  without even the  implied warranty of MERCHANTABILITY --
  16 -- or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License --
  17 -- for  more details.  You should have  received  a copy of the GNU General --
  18 -- Public License  distributed with GNAT;  see file COPYING.  If not, write --
  19 -- to  the Free Software Foundation,  59 Temple Place - Suite 330,  Boston, --
  20 -- MA 02111-1307, USA.                                                      --
  21 --                                                                          --
  22 -- GNAT was originally developed  by the GNAT team at  New York University. --
  23 -- Extensive contributions were provided by Ada Core Technologies Inc.      --
  24 --                                                                          --
  25 ------------------------------------------------------------------------------
  26
  27 with Types; use Types;
  28
  29 package Rtsfind is
  30
  31 --  This package contains the routine that is used to obtain runtime library
  32 --  entities, loading in the required runtime library packages on demand. It
  33 --  is also used for such purposes as finding System.Address when System has
  34 --  not been explicitly With'ed.
  35
  36    ------------------------
  37    -- Runtime Unit Table --
  38    ------------------------
  39
  40    --  The following type includes an enumeration entry for each runtime
  41    --  unit. The enumeration literal represents the fully qualified
  42    --  name of the unit, as follows:
  43
  44    --    Names of the form Ada_xxx are first level children of Ada, whose
  45    --    name is Ada.xxx. For example, the name Ada_Tags refers to package
  46    --    Ada.Tags.
  47
  48    --    Names of the form Ada_Calendar_xxx are second level children
  49    --    of Ada.Calendar. This is part of a temporary implementation of
  50    --    delays; eventually, packages implementing delays will be found
  51    --    relative to the package that declares the time type.
  52
  53    --    Names of the form Ada_Finalization_xxx are second level children
  54    --    of Ada.Finalization.
  55
  56    --    Names of the form Ada_Interrupts_xxx are second level children
  57    --    of Ada.Interrupts. This is needed for Ada.Interrupts.Names which
  58    --    is used by pragma Interrupt_State.
  59
  60    --    Names of the form Ada_Real_Time_xxx are second level children
  61    --    of Ada.Real_Time.
  62
  63    --    Names of the form Ada_Streams_xxx are second level children
  64    --    of Ada.Streams.
  65
  66    --    Names of the form Ada_Text_IO_xxx are second level children
  67    --    of Ada.Text_IO.
  68
  69    --    Names of the form Ada_Wide_Text_IO_xxx are second level children
  70    --    of Ada.Wide_Text_IO.
  71
  72    --    Names of the form Interfaces_xxx are first level children of
  73    --    Interfaces_CPP refers to package Interfaces.CPP
  74
  75    --    Names of the form System_xxx are first level children of System, whose
  76    --    name is System.xxx. For example, the name System_Str_Concat refers to
  77    --    package System.Str_Concat.
  78
  79    --    Names of the form System_Tasking_xxx are second level children of the
  80    --    package System.Tasking. For example, System_Tasking_Stages refers to
  81    --    refers to the package System.Tasking.Stages.
  82
  83    --    Other names stand for themselves (e.g. System for package System)
  84
  85    --  This list can contain both subprogram and package unit names. For
  86    --  packages, the accessible entities in the package are separately
  87    --  listed in the package entity table. The units must be either library
  88    --  level package declarations, or library level subprogram declarations.
  89    --  Generic units, library level instantiations and subprogram bodies
  90    --  acting as specs may not be referenced (all these cases could be added
  91    --  at the expense of additional complexity in the body of Rtsfind, but
  92    --  it doesn't seem worth while, since the implementation controls the
  93    --  set of units that are referenced, and this restrictions is easily met.
  94
  95    --  IMPORTANT NOTE: the specs of packages and procedures with'ed using
  96    --  this mechanism may not contain use clauses. This is because these
  97    --  subprograms are compiled in the current visibility environment, and
  98    --  it would be too much trouble to establish a clean environment for the
  99    --  compilation. The presence of extraneous visible stuff has no effect
 100    --  on the compilation except in the presence of use clauses (which might
 101    --  result in unexpected ambiguities).
 102
 103    type RTU_Id is (
 104       --  Runtime packages, for list of accessible entities in each
 105       --  package see declarations in the runtime entity table below.
 106
 107       RTU_Null,
 108       --  Used as a null entry. Will cause an error if referenced.
 109
 110       --  Children of Ada
 111
 112       Ada_Calendar,
 113       Ada_Exceptions,
 114       Ada_Finalization,
 115       Ada_Interrupts,
 116       Ada_Real_Time,
 117       Ada_Streams,
 118       Ada_Tags,
 119       Ada_Task_Identification,
 120
 121       --  Children of Ada.Calendar
 122
 123       Ada_Calendar_Delays,
 124
 125       --  Children of Ada.Finalization
 126
 127       Ada_Finalization_List_Controller,
 128
 129       --  Children of Ada.Interrupts
 130
 131       Ada_Interrupts_Names,
 132
 133       --  Children of Ada.Real_Time
 134
 135       Ada_Real_Time_Delays,
 136
 137       --  Children of Ada.Streams
 138
 139       Ada_Streams_Stream_IO,
 140
 141       --  Children of Ada.Text_IO (for Text_IO_Kludge)
 142
 143       Ada_Text_IO_Decimal_IO,
 144       Ada_Text_IO_Enumeration_IO,
 145       Ada_Text_IO_Fixed_IO,
 146       Ada_Text_IO_Float_IO,
 147       Ada_Text_IO_Integer_IO,
 148       Ada_Text_IO_Modular_IO,
 149
 150       --  Children of Ada.Wide_Text_IO (for Text_IO_Kludge)
 151
 152       Ada_Wide_Text_IO_Decimal_IO,
 153       Ada_Wide_Text_IO_Enumeration_IO,
 154       Ada_Wide_Text_IO_Fixed_IO,
 155       Ada_Wide_Text_IO_Float_IO,
 156       Ada_Wide_Text_IO_Integer_IO,
 157       Ada_Wide_Text_IO_Modular_IO,
 158
 159       --  Interfaces
 160
 161       Interfaces,
 162
 163       --  Children of Interfaces
 164
 165       Interfaces_CPP,
 166       Interfaces_Packed_Decimal,
 167
 168       --  Package System
 169
 170       System,
 171
 172       --  Children of System
 173
 174       System_Arith_64,
 175       System_AST_Handling,
 176       System_Assertions,
 177       System_Aux_DEC,
 178       System_Bit_Ops,
 179       System_Boolean_Array_Operations,
 180       System_Checked_Pools,
 181       System_Compare_Array_Signed_16,
 182       System_Compare_Array_Signed_32,
 183       System_Compare_Array_Signed_64,
 184       System_Compare_Array_Signed_8,
 185       System_Compare_Array_Unsigned_16,
 186       System_Compare_Array_Unsigned_32,
 187       System_Compare_Array_Unsigned_64,
 188       System_Compare_Array_Unsigned_8,
 189       System_Exception_Table,
 190       System_Exceptions,
 191       System_Exn_Int,
 192       System_Exn_LLF,
 193       System_Exn_LLI,
 194       System_Exp_Int,
 195       System_Exp_LInt,
 196       System_Exp_LLI,
 197       System_Exp_LLU,
 198       System_Exp_Mod,
 199       System_Exp_Uns,
 200       System_Fat_Flt,
 201       System_Fat_LFlt,
 202       System_Fat_LLF,
 203       System_Fat_SFlt,
 204       System_Finalization_Implementation,
 205       System_Finalization_Root,
 206       System_Fore,
 207       System_Img_Bool,
 208       System_Img_Char,
 209       System_Img_Dec,
 210       System_Img_Enum,
 211       System_Img_Int,
 212       System_Img_LLD,
 213       System_Img_LLI,
 214       System_Img_LLU,
 215       System_Img_Name,
 216       System_Img_Real,
 217       System_Img_Uns,
 218       System_Img_WChar,
 219       System_Interrupts,
 220       System_Machine_Code,
 221       System_Mantissa,
 222       System_Memcop,
 223       System_Pack_03,
 224       System_Pack_05,
 225       System_Pack_06,
 226       System_Pack_07,
 227       System_Pack_09,
 228       System_Pack_10,
 229       System_Pack_11,
 230       System_Pack_12,
 231       System_Pack_13,
 232       System_Pack_14,
 233       System_Pack_15,
 234       System_Pack_17,
 235       System_Pack_18,
 236       System_Pack_19,
 237       System_Pack_20,
 238       System_Pack_21,
 239       System_Pack_22,
 240       System_Pack_23,
 241       System_Pack_24,
 242       System_Pack_25,
 243       System_Pack_26,
 244       System_Pack_27,
 245       System_Pack_28,
 246       System_Pack_29,
 247       System_Pack_30,
 248       System_Pack_31,
 249       System_Pack_33,
 250       System_Pack_34,
 251       System_Pack_35,
 252       System_Pack_36,
 253       System_Pack_37,
 254       System_Pack_38,
 255       System_Pack_39,
 256       System_Pack_40,
 257       System_Pack_41,
 258       System_Pack_42,
 259       System_Pack_43,
 260       System_Pack_44,
 261       System_Pack_45,
 262       System_Pack_46,
 263       System_Pack_47,
 264       System_Pack_48,
 265       System_Pack_49,
 266       System_Pack_50,
 267       System_Pack_51,
 268       System_Pack_52,
 269       System_Pack_53,
 270       System_Pack_54,
 271       System_Pack_55,
 272       System_Pack_56,
 273       System_Pack_57,
 274       System_Pack_58,
 275       System_Pack_59,
 276       System_Pack_60,
 277       System_Pack_61,
 278       System_Pack_62,
 279       System_Pack_63,
 280       System_Parameters,
 281       System_Partition_Interface,
 282       System_Pool_Global,
 283       System_Pool_Empty,
 284       System_Pool_Local,
 285       System_Pool_Size,
 286       System_RPC,
 287       System_Scalar_Values,
 288       System_Secondary_Stack,
 289       System_Shared_Storage,
 290       System_Soft_Links,
 291       System_Standard_Library,
 292       System_Storage_Elements,
 293       System_Storage_Pools,
 294       System_Stream_Attributes,
 295       System_String_Ops,
 296       System_String_Ops_Concat_3,
 297       System_String_Ops_Concat_4,
 298       System_String_Ops_Concat_5,
 299       System_Task_Info,
 300       System_Tasking,
 301       System_Unsigned_Types,
 302       System_Val_Bool,
 303       System_Val_Char,
 304       System_Val_Dec,
 305       System_Val_Enum,
 306       System_Val_Int,
 307       System_Val_LLD,
 308       System_Val_LLI,
 309       System_Val_LLU,
 310       System_Val_Name,
 311       System_Val_Real,
 312       System_Val_Uns,
 313       System_Val_WChar,
 314       System_Vax_Float_Operations,
 315       System_Version_Control,
 316       System_VMS_Exception_Table,
 317       System_WCh_StW,
 318       System_WCh_WtS,
 319       System_Wid_Bool,
 320       System_Wid_Char,
 321       System_Wid_Enum,
 322       System_Wid_LLI,
 323       System_Wid_LLU,
 324       System_Wid_Name,
 325       System_Wid_WChar,
 326       System_WWd_Char,
 327       System_WWd_Enum,
 328       System_WWd_Wchar,
 329
 330       --  Children of System.Tasking
 331
 332       System_Tasking_Async_Delays,
 333       System_Tasking_Async_Delays_Enqueue_Calendar,
 334       System_Tasking_Async_Delays_Enqueue_RT,
 335       System_Tasking_Protected_Objects,
 336       System_Tasking_Protected_Objects_Entries,
 337       System_Tasking_Protected_Objects_Operations,
 338       System_Tasking_Protected_Objects_Single_Entry,
 339       System_Tasking_Restricted_Stages,
 340       System_Tasking_Rendezvous,
 341       System_Tasking_Stages);
 342
 343    subtype Ada_Child is RTU_Id
 344      range Ada_Calendar .. Ada_Wide_Text_IO_Modular_IO;
 345    --  Range of values for children or grand-children of Ada
 346
 347    subtype Ada_Calendar_Child is Ada_Child
 348      range Ada_Calendar_Delays .. Ada_Calendar_Delays;
 349    --  Range of values for children of Ada.Calendar
 350
 351    subtype Ada_Finalization_Child is Ada_Child range
 352      Ada_Finalization_List_Controller .. Ada_Finalization_List_Controller;
 353    --  Range of values for children of Ada.Finalization
 354
 355    subtype Ada_Interrupts_Child is Ada_Child range
 356      Ada_Interrupts_Names .. Ada_Interrupts_Names;
 357    --  Range of values for children of Ada.Interrupts
 358
 359    subtype Ada_Real_Time_Child is Ada_Child
 360      range Ada_Real_Time_Delays .. Ada_Real_Time_Delays;
 361    --  Range of values for children of Ada.Real_Time
 362
 363    subtype Ada_Streams_Child is Ada_Child
 364      range Ada_Streams_Stream_IO .. Ada_Streams_Stream_IO;
 365
 366    subtype Ada_Text_IO_Child is Ada_Child
 367      range Ada_Text_IO_Decimal_IO .. Ada_Text_IO_Modular_IO;
 368    --  Range of values for children of Ada.Text_IO
 369
 370    subtype Ada_Wide_Text_IO_Child is Ada_Child
 371      range Ada_Wide_Text_IO_Decimal_IO .. Ada_Wide_Text_IO_Modular_IO;
 372    --  Range of values for children of Ada.Text_IO
 373
 374    subtype Interfaces_Child is RTU_Id
 375      range Interfaces_CPP .. Interfaces_Packed_Decimal;
 376    --  Range of values for children of Interfaces
 377
 378    subtype System_Child is RTU_Id
 379      range System_Arith_64 .. System_Tasking_Stages;
 380    --  Range of values for children or grandchildren of System
 381
 382    subtype System_Tasking_Child is System_Child
 383      range System_Tasking_Async_Delays .. System_Tasking_Stages;
 384    --  Range of values for children of System.Tasking
 385
 386    subtype System_Tasking_Protected_Objects_Child is System_Tasking_Child
 387      range System_Tasking_Protected_Objects_Entries ..
 388        System_Tasking_Protected_Objects_Single_Entry;
 389    --  Range of values for children of System.Tasking.Protected_Objects
 390
 391    subtype System_Tasking_Restricted_Child is System_Tasking_Child
 392      range System_Tasking_Restricted_Stages ..
 393        System_Tasking_Restricted_Stages;
 394    --  Range of values for children of System.Tasking.Restricted
 395
 396    subtype System_Tasking_Async_Delays_Child is System_Tasking_Child
 397      range System_Tasking_Async_Delays_Enqueue_Calendar ..
 398        System_Tasking_Async_Delays_Enqueue_RT;
 399    --  Range of values for children of System.Tasking.Async_Delays
 400
 401    --------------------------
 402    -- Runtime Entity Table --
 403    --------------------------
 404
 405    --  This is the enumeration type used to define the argument passed to
 406    --  the RTE function. The name must exactly match the name of the entity
 407    --  involved, and in the case of a package entity, this name must uniquely
 408    --  imply the package containing the entity.
 409
 410    --  As far as possible, we avoid duplicate names in runtime packages, so
 411    --  that the name RE_nnn uniquely identifies the entity nnn. In some cases,
 412    --  it is impossible to avoid such duplication because the names come from
 413    --  RM defined packages. In such cases, the name is of the form RO_XX_nnn
 414    --  where XX is two letters used to differentiate the multiple occurrences
 415    --  of the name xx, and nnn is the entity name.
 416
 417    --  Note that not all entities in the units contained in the run-time unit
 418    --  table are included in the following table, only those that actually
 419    --  have to be referenced from generated code.
 420
 421    --  Note on RE_Null. This value is used as a null entry where an RE_Id
 422    --  value is required syntactically, but no real entry is required or
 423    --  needed. Use of this value will cause a fatal error in an RTE call.
 424
 425    type RE_Id is (
 426
 427      RE_Null,
 428
 429      RE_Exceptions_Available_In_HIE,     -- Ada.Exceptions
 430      RE_Code_Loc,                        -- Ada.Exceptions
 431      RE_Current_Target_Exception,        -- Ada.Exceptions (JGNAT use only)
 432      RE_Exception_Id,                    -- Ada.Exceptions
 433      RE_Exception_Information,           -- Ada.Exceptions
 434      RE_Exception_Message,               -- Ada.Exceptions
 435      RE_Exception_Name_Simple,           -- Ada.Exceptions
 436      RE_Exception_Occurrence,            -- Ada.Exceptions
 437      RE_Null_Id,                         -- Ada.Exceptions
 438      RE_Null_Occurrence,                 -- Ada.Exceptions
 439      RE_Poll,                            -- Ada.Exceptions
 440      RE_Raise_Exception,                 -- Ada.Exceptions
 441      RE_Raise_Exception_Always,          -- Ada.Exceptions
 442      RE_Reraise_Occurrence,              -- Ada.Exceptions
 443      RE_Reraise_Occurrence_Always,       -- Ada.Exceptions
 444      RE_Reraise_Occurrence_No_Defer,     -- Ada.Exceptions
 445      RE_Save_Occurrence,                 -- Ada.Exceptions
 446
 447      RE_Simple_List_Controller,          -- Ada.Finalization.List_Controller
 448      RE_List_Controller,                 -- Ada.Finalization.List_Controller
 449
 450      RE_Interrupt_ID,                    -- Ada.Interrupts
 451
 452      RE_Names,                           -- Ada.Interupts.Names
 453
 454      RE_Root_Stream_Type,                -- Ada.Streams
 455      RE_Stream_Element,                  -- Ada.Streams
 456      RE_Stream_Element_Count,            -- Ada.Streams
 457      RE_Stream_Element_Offset,           -- Ada.Streams
 458      RE_Stream_Element_Array,            -- Ada.Streams
 459
 460      RE_Stream_Access,                   -- Ada.Streams.Stream_IO
 461
 462      RE_CW_Membership,                   -- Ada.Tags
 463      RE_DT_Entry_Size,                   -- Ada.Tags
 464      RE_DT_Prologue_Size,                -- Ada.Tags
 465      RE_External_Tag,                    -- Ada.Tags
 466      RE_Get_Expanded_Name,               -- Ada.Tags
 467      RE_Get_External_Tag,                -- Ada.Tags
 468      RE_Get_Prim_Op_Address,             -- Ada.Tags
 469      RE_Get_RC_Offset,                   -- Ada.Tags
 470      RE_Get_Remotely_Callable,           -- Ada.Tags
 471      RE_Get_TSD,                         -- Ada.Tags
 472      RE_Inherit_DT,                      -- Ada.Tags
 473      RE_Inherit_TSD,                     -- Ada.Tags
 474      RE_Internal_Tag,                    -- Ada.Tags
 475      RE_Register_Tag,                    -- Ada.Tags
 476      RE_Set_Expanded_Name,               -- Ada.Tags
 477      RE_Set_External_Tag,                -- Ada.Tags
 478      RE_Set_Prim_Op_Address,             -- Ada.Tags
 479      RE_Set_RC_Offset,                   -- Ada.Tags
 480      RE_Set_Remotely_Callable,           -- Ada.Tags
 481      RE_Set_TSD,                         -- Ada.Tags
 482      RE_Tag_Error,                       -- Ada.Tags
 483      RE_TSD_Entry_Size,                  -- Ada.Tags
 484      RE_TSD_Prologue_Size,               -- Ada.Tags
 485      RE_Tag,                             -- Ada.Tags
 486      RE_Address_Array,                   -- Ada.Tags
 487
 488      RE_Abort_Task,                      -- Ada.Task_Identification
 489      RE_Current_Task,                    -- Ada.Task_Identification
 490      RO_AT_Task_ID,                      -- Ada.Task_Identification
 491
 492      RO_CA_Time,                         -- Ada.Calendar
 493
 494      RO_CA_Delay_For,                    -- Ada.Calendar.Delays
 495      RO_CA_Delay_Until,                  -- Ada.Calendar.Delays
 496      RO_CA_To_Duration,                  -- Ada.Calendar.Delays
 497
 498      RO_RT_Time,                         -- Ada.Real_Time
 499
 500      RO_RT_Delay_Until,                  -- Ada.Real_Time.Delays
 501      RO_RT_To_Duration,                  -- Ada.Real_Time.Delays
 502
 503      RE_Integer_64,                      -- Interfaces
 504      RE_Unsigned_8,                      -- Interfaces
 505      RE_Unsigned_16,                     -- Interfaces
 506      RE_Unsigned_32,                     -- Interfaces
 507      RE_Unsigned_64,                     -- Interfaces
 508
 509      RE_Vtable_Ptr,                      -- Interfaces.CPP
 510      RE_Displaced_This,                  -- Interfaces.CPP
 511      RE_CPP_CW_Membership,               -- Interfaces.CPP
 512      RE_CPP_DT_Entry_Size,               -- Interfaces.CPP
 513      RE_CPP_DT_Prologue_Size,            -- Interfaces.CPP
 514      RE_CPP_Get_Expanded_Name,           -- Interfaces.CPP
 515      RE_CPP_Get_External_Tag,            -- Interfaces.CPP
 516      RE_CPP_Get_Prim_Op_Address,         -- Interfaces.CPP
 517      RE_CPP_Get_RC_Offset,               -- Interfaces.CPP
 518      RE_CPP_Get_Remotely_Callable,       -- Interfaces.CPP
 519      RE_CPP_Get_TSD,                     -- Interfaces.CPP
 520      RE_CPP_Inherit_DT,                  -- Interfaces.CPP
 521      RE_CPP_Inherit_TSD,                 -- Interfaces.CPP
 522      RE_CPP_Register_Tag,                -- Interfaces.CPP
 523      RE_CPP_Set_Expanded_Name,           -- Interfaces.CPP
 524      RE_CPP_Set_External_Tag,            -- Interfaces.CPP
 525      RE_CPP_Set_Prim_Op_Address,         -- Interfaces.CPP
 526      RE_CPP_Set_RC_Offset,               -- Interfaces.CPP
 527      RE_CPP_Set_Remotely_Callable,       -- Interfaces.CPP
 528      RE_CPP_Set_TSD,                     -- Interfaces.CPP
 529      RE_CPP_TSD_Entry_Size,              -- Interfaces.CPP
 530      RE_CPP_TSD_Prologue_Size,           -- Interfaces.CPP
 531
 532      RE_Packed_Size,                     -- Interfaces.Packed_Decimal
 533      RE_Packed_To_Int32,                 -- Interfaces.Packed_Decimal
 534      RE_Packed_To_Int64,                 -- Interfaces.Packed_Decimal
 535      RE_Int32_To_Packed,                 -- Interfaces.Packed_Decimal
 536      RE_Int64_To_Packed,                 -- Interfaces.Packed_Decimal
 537
 538      RE_Address,                         -- System
 539      RE_Any_Priority,                    -- System
 540      RE_Bit_Order,                       -- System
 541      RE_Default_Priority,                -- System
 542      RE_High_Order_First,                -- System
 543      RE_Interrupt_Priority,              -- System
 544      RE_Lib_Stop,                        -- System
 545      RE_Low_Order_First,                 -- System
 546      RE_Max_Interrupt_Priority,          -- System
 547      RE_Max_Priority,                    -- System
 548      RE_Null_Address,                    -- System
 549      RE_Priority,                        -- System
 550
 551      RE_Add_With_Ovflo_Check,            -- System.Arith_64
 552      RE_Double_Divide,                   -- System.Arith_64
 553      RE_Multiply_With_Ovflo_Check,       -- System.Arith_64
 554      RE_Scaled_Divide,                   -- System.Arith_64
 555      RE_Subtract_With_Ovflo_Check,       -- System.Arith_64
 556
 557      RE_Create_AST_Handler,              -- System.AST_Handling
 558
 559      RE_Raise_Assert_Failure,            -- System.Assertions
 560
 561      RE_AST_Handler,                     -- System.Aux_DEC
 562      RE_Import_Value,                    -- System.Aux_DEC
 563      RE_No_AST_Handler,                  -- System.Aux_DEC
 564      RE_Type_Class,                      -- System.Aux_DEC
 565      RE_Type_Class_Enumeration,          -- System.Aux_DEC
 566      RE_Type_Class_Integer,              -- System.Aux_DEC
 567      RE_Type_Class_Fixed_Point,          -- System.Aux_DEC
 568      RE_Type_Class_Floating_Point,       -- System.Aux_DEC
 569      RE_Type_Class_Array,                -- System.Aux_DEC
 570      RE_Type_Class_Record,               -- System.Aux_DEC
 571      RE_Type_Class_Access,               -- System.Aux_DEC
 572      RE_Type_Class_Task,                 -- System.Aux_DEC
 573      RE_Type_Class_Address,              -- System.Aux_DEC
 574
 575      RE_Bit_And,                         -- System.Bit_Ops
 576      RE_Bit_Eq,                          -- System.Bit_Ops
 577      RE_Bit_Not,                         -- System.Bit_Ops
 578      RE_Bit_Or,                          -- System.Bit_Ops
 579      RE_Bit_Xor,                         -- System.Bit_Ops
 580
 581      RE_Boolean_Array,                   -- System_Boolean_Array_Operations,
 582      RE_Vector_Not,                      -- System_Boolean_Array_Operations,
 583      RE_Vector_And,                      -- System_Boolean_Array_Operations,
 584      RE_Vector_Or,                       -- System_Boolean_Array_Operations,
 585      RE_Vector_Nand,                     -- System_Boolean_Array_Operations,
 586      RE_Vector_Nor,                      -- System_Boolean_Array_Operations,
 587      RE_Vector_Nxor,                     -- System_Boolean_Array_Operations,
 588      RE_Vector_Xor,                      -- System_Boolean_Array_Operations,
 589
 590      RE_Checked_Pool,                    -- System.Checked_Pools
 591
 592      RE_Compare_Array_S8,                -- System.Compare_Array_Signed_8
 593      RE_Compare_Array_S8_Unaligned,      -- System.Compare_Array_Signed_8
 594
 595      RE_Compare_Array_S16,               -- System.Compare_Array_Signed_16
 596
 597      RE_Compare_Array_S32,               -- System.Compare_Array_Signed_16
 598
 599      RE_Compare_Array_S64,               -- System.Compare_Array_Signed_16
 600
 601      RE_Compare_Array_U8,                -- System.Compare_Array_Unsigned_8
 602      RE_Compare_Array_U8_Unaligned,      -- System.Compare_Array_Unsigned_8
 603
 604      RE_Compare_Array_U16,               -- System.Compare_Array_Unsigned_16
 605
 606      RE_Compare_Array_U32,               -- System.Compare_Array_Unsigned_16
 607
 608      RE_Compare_Array_U64,               -- System.Compare_Array_Unsigned_16
 609
 610      RE_Register_Exception,              -- System.Exception_Table
 611
 612      RE_All_Others_Id,                   -- System.Exceptions
 613      RE_Handler_Record,                  -- System.Exceptions
 614      RE_Handler_Record_Ptr,              -- System.Exceptions
 615      RE_Others_Id,                       -- System.Exceptions
 616      RE_Subprogram_Descriptor,           -- System.Exceptions
 617      RE_Subprogram_Descriptor_0,         -- System.Exceptions
 618      RE_Subprogram_Descriptor_1,         -- System.Exceptions
 619      RE_Subprogram_Descriptor_2,         -- System.Exceptions
 620      RE_Subprogram_Descriptor_3,         -- System.Exceptions
 621      RE_Subprogram_Descriptor_List,      -- System.Exceptions
 622      RE_Subprogram_Descriptor_Ptr,       -- System.Exceptions
 623      RE_Subprogram_Descriptors_Record,   -- System.Exceptions
 624      RE_Subprogram_Descriptors_Ptr,      -- System.Exceptions
 625
 626      RE_Exn_Integer,                     -- System.Exn_Int
 627
 628      RE_Exn_Long_Long_Float,             -- System.Exn_LLF
 629
 630      RE_Exn_Long_Long_Integer,           -- System.Exn_LLI
 631
 632      RE_Exp_Integer,                     -- System.Exp_Int
 633
 634      RE_Exp_Long_Long_Integer,           -- System.Exp_LLI
 635
 636      RE_Exp_Long_Long_Unsigned,          -- System.Exp_LLU
 637
 638      RE_Exp_Modular,                     -- System.Exp_Mod
 639
 640      RE_Exp_Unsigned,                    -- System.Exp_Uns
 641
 642      RE_Fat_Float,                       -- System.Fat_Flt
 643
 644      RE_Fat_Long_Float,                  -- System.Fat_LFlt
 645
 646      RE_Fat_Long_Long_Float,             -- System.Fat_LLF
 647
 648      RE_Fat_Short_Float,                 -- System.Fat_SFlt
 649
 650      RE_Attach_To_Final_List,            -- System.Finalization_Implementation
 651      RE_Finalize_List,                   -- System.Finalization_Implementation
 652      RE_Finalize_One,                    -- System.Finalization_Implementation
 653      RE_Global_Final_List,               -- System.Finalization_Implementation
 654      RE_Record_Controller,               -- System.Finalization_Implementation
 655      RE_Limited_Record_Controller,       -- System.Finalization_Implementation
 656      RE_Deep_Tag_Initialize,             -- System.Finalization_Implementation
 657      RE_Deep_Tag_Adjust,                 -- System.Finalization_Implementation
 658      RE_Deep_Tag_Finalize,               -- System.Finalization_Implementation
 659      RE_Deep_Tag_Attach,                 -- System.Finalization_Implementation
 660      RE_Deep_Rec_Initialize,             -- System.Finalization_Implementation
 661      RE_Deep_Rec_Adjust,                 -- System.Finalization_Implementation
 662      RE_Deep_Rec_Finalize,               -- System.Finalization_Implementation
 663
 664      RE_Root_Controlled,                 -- System.Finalization_Root
 665      RE_Finalizable,                     -- System.Finalization_Root
 666      RE_Finalizable_Ptr,                 -- System.Finalization_Root
 667
 668      RE_Fore,                            -- System.Fore
 669
 670      RE_Image_Boolean,                   -- System.Img_Bool
 671
 672      RE_Image_Character,                 -- System.Img_Char
 673
 674      RE_Image_Decimal,                   -- System.Img_Dec
 675
 676      RE_Image_Enumeration_8,             -- System.Img_Enum
 677      RE_Image_Enumeration_16,            -- System.Img_Enum
 678      RE_Image_Enumeration_32,            -- System.Img_Enum
 679
 680      RE_Image_Integer,                   -- System.Img_Int
 681
 682      RE_Image_Long_Long_Decimal,         -- System.Img_LLD
 683
 684      RE_Image_Long_Long_Integer,         -- System.Img_LLI
 685
 686      RE_Image_Long_Long_Unsigned,        -- System.Img_LLU
 687
 688      RE_Image_Ordinary_Fixed_Point,      -- System.Img_Real
 689      RE_Image_Floating_Point,            -- System.Img_Real
 690
 691      RE_Image_Unsigned,                  -- System.Img_Uns
 692
 693      RE_Image_Wide_Character,            -- System.Img_WChar
 694
 695      RE_Bind_Interrupt_To_Entry,         -- System.Interrupts
 696      RE_Default_Interrupt_Priority,      -- System.Interrupts
 697      RE_Dynamic_Interrupt_Protection,    -- System.Interrupts
 698      RE_Install_Handlers,                -- System.Interrupts
 699      RE_Register_Interrupt_Handler,      -- System.Interrupts
 700      RE_Static_Interrupt_Protection,     -- System.Interrupts
 701      RE_System_Interrupt_Id,             -- System.Interrupts
 702
 703      RE_Asm_Insn,                        -- System.Machine_Code
 704      RE_Asm_Input_Operand,               -- System.Machine_Code
 705      RE_Asm_Output_Operand,              -- System.Machine_Code
 706
 707      RE_Mantissa_Value,                  -- System_Mantissa
 708
 709      RE_memcpy,                          -- System_Memcop
 710      RE_memmove,                         -- System_Memcop
 711
 712      RE_Bits_03,                         -- System.Pack_03
 713      RE_Get_03,                          -- System.Pack_03
 714      RE_Set_03,                          -- System.Pack_03
 715
 716      RE_Bits_05,                         -- System.Pack_05
 717      RE_Get_05,                          -- System.Pack_05
 718      RE_Set_05,                          -- System.Pack_05
 719
 720      RE_Bits_06,                         -- System.Pack_06
 721      RE_Get_06,                          -- System.Pack_06
 722      RE_GetU_06,                         -- System.Pack_06
 723      RE_Set_06,                          -- System.Pack_06
 724      RE_SetU_06,                         -- System.Pack_06
 725
 726      RE_Bits_07,                         -- System.Pack_07
 727      RE_Get_07,                          -- System.Pack_07
 728      RE_Set_07,                          -- System.Pack_07
 729
 730      RE_Bits_09,                         -- System.Pack_09
 731      RE_Get_09,                          -- System.Pack_09
 732      RE_Set_09,                          -- System.Pack_09
 733
 734      RE_Bits_10,                         -- System.Pack_10
 735      RE_Get_10,                          -- System.Pack_10
 736      RE_GetU_10,                         -- System.Pack_10
 737      RE_Set_10,                          -- System.Pack_10
 738      RE_SetU_10,                         -- System.Pack_10
 739
 740      RE_Bits_11,                         -- System.Pack_11
 741      RE_Get_11,                          -- System.Pack_11
 742      RE_Set_11,                          -- System.Pack_11
 743
 744      RE_Bits_12,                         -- System.Pack_12
 745      RE_Get_12,                          -- System.Pack_12
 746      RE_GetU_12,                         -- System.Pack_12
 747      RE_Set_12,                          -- System.Pack_12
 748      RE_SetU_12,                         -- System.Pack_12
 749
 750      RE_Bits_13,                         -- System.Pack_13
 751      RE_Get_13,                          -- System.Pack_13
 752      RE_Set_13,                          -- System.Pack_13
 753
 754      RE_Bits_14,                         -- System.Pack_14
 755      RE_Get_14,                          -- System.Pack_14
 756      RE_GetU_14,                         -- System.Pack_14
 757      RE_Set_14,                          -- System.Pack_14
 758      RE_SetU_14,                         -- System.Pack_14
 759
 760      RE_Bits_15,                         -- System.Pack_15
 761      RE_Get_15,                          -- System.Pack_15
 762      RE_Set_15,                          -- System.Pack_15
 763
 764      RE_Bits_17,                         -- System.Pack_17
 765      RE_Get_17,                          -- System.Pack_17
 766      RE_Set_17,                          -- System.Pack_17
 767
 768      RE_Bits_18,                         -- System.Pack_18
 769      RE_Get_18,                          -- System.Pack_18
 770      RE_GetU_18,                         -- System.Pack_18
 771      RE_Set_18,                          -- System.Pack_18
 772      RE_SetU_18,                         -- System.Pack_18
 773
 774      RE_Bits_19,                         -- System.Pack_19
 775      RE_Get_19,                          -- System.Pack_19
 776      RE_Set_19,                          -- System.Pack_19
 777
 778      RE_Bits_20,                         -- System.Pack_20
 779      RE_Get_20,                          -- System.Pack_20
 780      RE_GetU_20,                         -- System.Pack_20
 781      RE_Set_20,                          -- System.Pack_20
 782      RE_SetU_20,                         -- System.Pack_20
 783
 784      RE_Bits_21,                         -- System.Pack_21
 785      RE_Get_21,                          -- System.Pack_21
 786      RE_Set_21,                          -- System.Pack_21
 787
 788      RE_Bits_22,                         -- System.Pack_22
 789      RE_Get_22,                          -- System.Pack_22
 790      RE_GetU_22,                         -- System.Pack_22
 791      RE_Set_22,                          -- System.Pack_22
 792      RE_SetU_22,                         -- System.Pack_22
 793
 794      RE_Bits_23,                         -- System.Pack_23
 795      RE_Get_23,                          -- System.Pack_23
 796      RE_Set_23,                          -- System.Pack_23
 797
 798      RE_Bits_24,                         -- System.Pack_24
 799      RE_Get_24,                          -- System.Pack_24
 800      RE_GetU_24,                         -- System.Pack_24
 801      RE_Set_24,                          -- System.Pack_24
 802      RE_SetU_24,                         -- System.Pack_24
 803
 804      RE_Bits_25,                         -- System.Pack_25
 805      RE_Get_25,                          -- System.Pack_25
 806      RE_Set_25,                          -- System.Pack_25
 807
 808      RE_Bits_26,                         -- System.Pack_26
 809      RE_Get_26,                          -- System.Pack_26
 810      RE_GetU_26,                         -- System.Pack_26
 811      RE_Set_26,                          -- System.Pack_26
 812      RE_SetU_26,                         -- System.Pack_26
 813
 814      RE_Bits_27,                         -- System.Pack_27
 815      RE_Get_27,                          -- System.Pack_27
 816      RE_Set_27,                          -- System.Pack_27
 817
 818      RE_Bits_28,                         -- System.Pack_28
 819      RE_Get_28,                          -- System.Pack_28
 820      RE_GetU_28,                         -- System.Pack_28
 821      RE_Set_28,                          -- System.Pack_28
 822      RE_SetU_28,                         -- System.Pack_28
 823
 824      RE_Bits_29,                         -- System.Pack_29
 825      RE_Get_29,                          -- System.Pack_29
 826      RE_Set_29,                          -- System.Pack_29
 827
 828      RE_Bits_30,                         -- System.Pack_30
 829      RE_Get_30,                          -- System.Pack_30
 830      RE_GetU_30,                         -- System.Pack_30
 831      RE_Set_30,                          -- System.Pack_30
 832      RE_SetU_30,                         -- System.Pack_30
 833
 834      RE_Bits_31,                         -- System.Pack_31
 835      RE_Get_31,                          -- System.Pack_31
 836      RE_Set_31,                          -- System.Pack_31
 837
 838      RE_Bits_33,                         -- System.Pack_33
 839      RE_Get_33,                          -- System.Pack_33
 840      RE_Set_33,                          -- System.Pack_33
 841
 842      RE_Bits_34,                         -- System.Pack_34
 843      RE_Get_34,                          -- System.Pack_34
 844      RE_GetU_34,                         -- System.Pack_34
 845      RE_Set_34,                          -- System.Pack_34
 846      RE_SetU_34,                         -- System.Pack_34
 847
 848      RE_Bits_35,                         -- System.Pack_35
 849      RE_Get_35,                          -- System.Pack_35
 850      RE_Set_35,                          -- System.Pack_35
 851
 852      RE_Bits_36,                         -- System.Pack_36
 853      RE_Get_36,                          -- System.Pack_36
 854      RE_GetU_36,                         -- System.Pack_36
 855      RE_Set_36,                          -- System.Pack_36
 856      RE_SetU_36,                         -- System.Pack_36
 857
 858      RE_Bits_37,                         -- System.Pack_37
 859      RE_Get_37,                          -- System.Pack_37
 860      RE_Set_37,                          -- System.Pack_37
 861
 862      RE_Bits_38,                         -- System.Pack_38
 863      RE_Get_38,                          -- System.Pack_38
 864      RE_GetU_38,                         -- System.Pack_38
 865      RE_Set_38,                          -- System.Pack_38
 866      RE_SetU_38,                         -- System.Pack_38
 867
 868      RE_Bits_39,                         -- System.Pack_39
 869      RE_Get_39,                          -- System.Pack_39
 870      RE_Set_39,                          -- System.Pack_39
 871
 872      RE_Bits_40,                         -- System.Pack_40
 873      RE_Get_40,                          -- System.Pack_40
 874      RE_GetU_40,                         -- System.Pack_40
 875      RE_Set_40,                          -- System.Pack_40
 876      RE_SetU_40,                         -- System.Pack_40
 877
 878      RE_Bits_41,                         -- System.Pack_41
 879      RE_Get_41,                          -- System.Pack_41
 880      RE_Set_41,                          -- System.Pack_41
 881
 882      RE_Bits_42,                         -- System.Pack_42
 883      RE_Get_42,                          -- System.Pack_42
 884      RE_GetU_42,                         -- System.Pack_42
 885      RE_Set_42,                          -- System.Pack_42
 886      RE_SetU_42,                         -- System.Pack_42
 887
 888      RE_Bits_43,                         -- System.Pack_43
 889      RE_Get_43,                          -- System.Pack_43
 890      RE_Set_43,                          -- System.Pack_43
 891
 892      RE_Bits_44,                         -- System.Pack_44
 893      RE_Get_44,                          -- System.Pack_44
 894      RE_GetU_44,                         -- System.Pack_44
 895      RE_Set_44,                          -- System.Pack_44
 896      RE_SetU_44,                         -- System.Pack_44
 897
 898      RE_Bits_45,                         -- System.Pack_45
 899      RE_Get_45,                          -- System.Pack_45
 900      RE_Set_45,                          -- System.Pack_45
 901
 902      RE_Bits_46,                         -- System.Pack_46
 903      RE_Get_46,                          -- System.Pack_46
 904      RE_GetU_46,                         -- System.Pack_46
 905      RE_Set_46,                          -- System.Pack_46
 906      RE_SetU_46,                         -- System.Pack_46
 907
 908      RE_Bits_47,                         -- System.Pack_47
 909      RE_Get_47,                          -- System.Pack_47
 910      RE_Set_47,                          -- System.Pack_47
 911
 912      RE_Bits_48,                         -- System.Pack_48
 913      RE_Get_48,                          -- System.Pack_48
 914      RE_GetU_48,                         -- System.Pack_48
 915      RE_Set_48,                          -- System.Pack_48
 916      RE_SetU_48,                         -- System.Pack_48
 917
 918      RE_Bits_49,                         -- System.Pack_49
 919      RE_Get_49,                          -- System.Pack_49
 920      RE_Set_49,                          -- System.Pack_49
 921
 922      RE_Bits_50,                         -- System.Pack_50
 923      RE_Get_50,                          -- System.Pack_50
 924      RE_GetU_50,                         -- System.Pack_50
 925      RE_Set_50,                          -- System.Pack_50
 926      RE_SetU_50,                         -- System.Pack_50
 927
 928      RE_Bits_51,                         -- System.Pack_51
 929      RE_Get_51,                          -- System.Pack_51
 930      RE_Set_51,                          -- System.Pack_51
 931
 932      RE_Bits_52,                         -- System.Pack_52
 933      RE_Get_52,                          -- System.Pack_52
 934      RE_GetU_52,                         -- System.Pack_52
 935      RE_Set_52,                          -- System.Pack_52
 936      RE_SetU_52,                         -- System.Pack_52
 937
 938      RE_Bits_53,                         -- System.Pack_53
 939      RE_Get_53,                          -- System.Pack_53
 940      RE_Set_53,                          -- System.Pack_53
 941
 942      RE_Bits_54,                         -- System.Pack_54
 943      RE_Get_54,                          -- System.Pack_54
 944      RE_GetU_54,                         -- System.Pack_54
 945      RE_Set_54,                          -- System.Pack_54
 946      RE_SetU_54,                         -- System.Pack_54
 947
 948      RE_Bits_55,                         -- System.Pack_55
 949      RE_Get_55,                          -- System.Pack_55
 950      RE_Set_55,                          -- System.Pack_55
 951
 952      RE_Bits_56,                         -- System.Pack_56
 953      RE_Get_56,                          -- System.Pack_56
 954      RE_GetU_56,                         -- System.Pack_56
 955      RE_Set_56,                          -- System.Pack_56
 956      RE_SetU_56,                         -- System.Pack_56
 957
 958      RE_Bits_57,                         -- System.Pack_57
 959      RE_Get_57,                          -- System.Pack_57
 960      RE_Set_57,                          -- System.Pack_57
 961
 962      RE_Bits_58,                         -- System.Pack_58
 963      RE_Get_58,                          -- System.Pack_58
 964      RE_GetU_58,                         -- System.Pack_58
 965      RE_Set_58,                          -- System.Pack_58
 966      RE_SetU_58,                         -- System.Pack_58
 967
 968      RE_Bits_59,                         -- System.Pack_59
 969      RE_Get_59,                          -- System.Pack_59
 970      RE_Set_59,                          -- System.Pack_59
 971
 972      RE_Bits_60,                         -- System.Pack_60
 973      RE_Get_60,                          -- System.Pack_60
 974      RE_GetU_60,                         -- System.Pack_60
 975      RE_Set_60,                          -- System.Pack_60
 976      RE_SetU_60,                         -- System.Pack_60
 977
 978      RE_Bits_61,                         -- System.Pack_61
 979      RE_Get_61,                          -- System.Pack_61
 980      RE_Set_61,                          -- System.Pack_61
 981
 982      RE_Bits_62,                         -- System.Pack_62
 983      RE_Get_62,                          -- System.Pack_62
 984      RE_GetU_62,                         -- System.Pack_62
 985      RE_Set_62,                          -- System.Pack_62
 986      RE_SetU_62,                         -- System.Pack_62
 987
 988      RE_Bits_63,                         -- System.Pack_63
 989      RE_Get_63,                          -- System.Pack_63
 990      RE_Set_63,                          -- System.Pack_63
 991
 992      RE_Adjust_Storage_Size,             -- System_Parameters
 993      RE_Default_Stack_Size,              -- System.Parameters
 994      RE_Garbage_Collected,               -- System.Parameters
 995      RE_Size_Type,                       -- System.Parameters
 996      RE_Unspecified_Size,                -- System.Parameters
 997
 998      RE_Get_Active_Partition_Id,         -- System.Partition_Interface
 999      RE_Get_Passive_Partition_Id,        -- System.Partition_Interface
1000      RE_Get_Local_Partition_Id,          -- System.Partition_Interface
1001      RE_Get_RCI_Package_Receiver,        -- System.Partition_Interface
1002      RE_Get_Unique_Remote_Pointer,       -- System.Partition_Interface
1003      RE_RACW_Stub_Type,                  -- System.Partition_Interface
1004      RE_RACW_Stub_Type_Access,           -- System.Partition_Interface
1005      RE_Raise_Program_Error_For_E_4_18,  -- System.Partition_Interface
1006      RE_Raise_Program_Error_Unknown_Tag, -- System.Partition_Interface
1007      RE_Register_Passive_Package,        -- System.Partition_Interface
1008      RE_Register_Receiving_Stub,         -- System.Partition_Interface
1009      RE_RCI_Info,                        -- System.Partition_Interface
1010      RE_Subprogram_Id,                   -- System.Partition_Interface
1011
1012      RE_Global_Pool_Object,              -- System.Pool_Global
1013
1014      RE_Unbounded_Reclaim_Pool,          -- System.Pool_Local
1015
1016      RE_Stack_Bounded_Pool,              -- System.Pool_Size
1017
1018      RE_Do_Apc,                          -- System.RPC
1019      RE_Do_Rpc,                          -- System.RPC
1020      RE_Params_Stream_Type,              -- System.RPC
1021      RE_Partition_ID,                    -- System.RPC
1022      RE_RPC_Receiver,                    -- System.RPC
1023
1024      RE_IS_Is1,                          -- System.Scalar_Values
1025      RE_IS_Is2,                          -- System.Scalar_Values
1026      RE_IS_Is4,                          -- System.Scalar_Values
1027      RE_IS_Is8,                          -- System.Scalar_Values
1028      RE_IS_Iu1,                          -- System.Scalar_Values
1029      RE_IS_Iu2,                          -- System.Scalar_Values
1030      RE_IS_Iu4,                          -- System.Scalar_Values
1031      RE_IS_Iu8,                          -- System.Scalar_Values
1032      RE_IS_Isf,                          -- System.Scalar_Values
1033      RE_IS_Ifl,                          -- System.Scalar_Values
1034      RE_IS_Ilf,                          -- System.Scalar_Values
1035      RE_IS_Ill,                          -- System.Scalar_Values
1036
1037      RE_Mark_Id,                         -- System.Secondary_Stack
1038      RE_SS_Allocate,                     -- System.Secondary_Stack
1039      RE_SS_Pool,                         -- System.Secondary_Stack
1040      RE_SS_Mark,                         -- System.Secondary_Stack
1041      RE_SS_Release,                      -- System.Secondary_Stack
1042
1043      RE_Shared_Var_Close,                -- System.Shared_Storage
1044      RE_Shared_Var_Lock,                 -- System.Shared_Storage
1045      RE_Shared_Var_ROpen,                -- System.Shared_Storage
1046      RE_Shared_Var_Unlock,               -- System.Shared_Storage
1047      RE_Shared_Var_WOpen,                -- System.Shared_Storage
1048
1049      RE_Abort_Undefer_Direct,            -- System.Standard_Library
1050      RE_Exception_Data_Ptr,              -- System.Standard_Library
1051
1052      RE_Integer_Address,                 -- System.Storage_Elements
1053      RE_Storage_Offset,                  -- System.Storage_Elements
1054      RE_Storage_Array,                   -- System.Storage_Elements
1055      RE_To_Address,                      -- System.Storage_Elements
1056
1057      RE_Root_Storage_Pool,               -- System.Storage_Pools
1058      RE_Allocate_Any,                    -- System_Storage_Pools,
1059      RE_Deallocate_Any,                  -- System_Storage_Pools,
1060
1061      RE_Thin_Pointer,                    -- System.Stream_Attributes
1062      RE_Fat_Pointer,                     -- System.Stream_Attributes
1063
1064      RE_I_AD,                            -- System.Stream_Attributes
1065      RE_I_AS,                            -- System.Stream_Attributes
1066      RE_I_B,                             -- System.Stream_Attributes
1067      RE_I_C,                             -- System.Stream_Attributes
1068      RE_I_F,                             -- System.Stream_Attributes
1069      RE_I_I,                             -- System.Stream_Attributes
1070      RE_I_LF,                            -- System.Stream_Attributes
1071      RE_I_LI,                            -- System.Stream_Attributes
1072      RE_I_LLF,                           -- System.Stream_Attributes
1073      RE_I_LLI,                           -- System.Stream_Attributes
1074      RE_I_LLU,                           -- System.Stream_Attributes
1075      RE_I_LU,                            -- System.Stream_Attributes
1076      RE_I_SF,                            -- System.Stream_Attributes
1077      RE_I_SI,                            -- System.Stream_Attributes
1078      RE_I_SSI,                           -- System.Stream_Attributes
1079      RE_I_SSU,                           -- System.Stream_Attributes
1080      RE_I_SU,                            -- System.Stream_Attributes
1081      RE_I_U,                             -- System.Stream_Attributes
1082      RE_I_WC,                            -- System.Stream_Attributes
1083
1084      RE_W_AD,                            -- System.Stream_Attributes
1085      RE_W_AS,                            -- System.Stream_Attributes
1086      RE_W_B,                             -- System.Stream_Attributes
1087      RE_W_C,                             -- System.Stream_Attributes
1088      RE_W_F,                             -- System.Stream_Attributes
1089      RE_W_I,                             -- System.Stream_Attributes
1090      RE_W_LF,                            -- System.Stream_Attributes
1091      RE_W_LI,                            -- System.Stream_Attributes
1092      RE_W_LLF,                           -- System.Stream_Attributes
1093      RE_W_LLI,                           -- System.Stream_Attributes
1094      RE_W_LLU,                           -- System.Stream_Attributes
1095      RE_W_LU,                            -- System.Stream_Attributes
1096      RE_W_SF,                            -- System.Stream_Attributes
1097      RE_W_SI,                            -- System.Stream_Attributes
1098      RE_W_SSI,                           -- System.Stream_Attributes
1099      RE_W_SSU,                           -- System.Stream_Attributes
1100      RE_W_SU,                            -- System.Stream_Attributes
1101      RE_W_U,                             -- System.Stream_Attributes
1102      RE_W_WC,                            -- System.Stream_Attributes
1103
1104      RE_Block_Stream_Ops_OK,             -- System.Stream_Attributes
1105
1106      RE_Str_Concat,                      -- System.String_Ops
1107      RE_Str_Concat_CC,                   -- System.String_Ops
1108      RE_Str_Concat_CS,                   -- System.String_Ops
1109      RE_Str_Concat_SC,                   -- System.String_Ops
1110      RE_Str_Normalize,                   -- System.String_Ops
1111      RE_Wide_Str_Normalize,              -- System.String_Ops
1112
1113      RE_Str_Concat_3,                    -- System.String_Ops_Concat_3
1114
1115      RE_Str_Concat_4,                    -- System.String_Ops_Concat_4
1116
1117      RE_Str_Concat_5,                    -- System.String_Ops_Concat_5
1118
1119      RE_Task_Info_Type,                  -- System.Task_Info
1120      RE_Unspecified_Task_Info,           -- System.Task_Info
1121
1122      RE_Library_Task_Level,              -- System.Tasking
1123
1124      RE_Task_Procedure_Access,           -- System.Tasking
1125
1126      RO_ST_Task_ID,                      -- System.Tasking
1127
1128      RE_Call_Modes,                      -- System.Tasking
1129      RE_Simple_Call,                     -- System.Tasking
1130      RE_Conditional_Call,                -- System.Tasking
1131      RE_Asynchronous_Call,               -- System.Tasking
1132      RE_Timed_Call,                      -- System.Tasking
1133
1134      RE_Task_List,                       -- System.Tasking
1135
1136      RE_Accept_Alternative,              -- System.Tasking
1137      RE_Accept_List,                     -- System.Tasking
1138      RE_Accept_List_Access,              -- System.Tasking
1139      RE_Max_Select,                      -- System.Tasking
1140      RE_Max_Task_Entry,                  -- System.Tasking
1141      RE_No_Rendezvous,                   -- System.Tasking
1142      RE_Null_Task_Entry,                 -- System.Tasking
1143      RE_Positive_Select_Index,           -- System.Tasking
1144      RE_Select_Index,                    -- System.Tasking
1145      RE_Select_Modes,                    -- System.Tasking
1146      RE_Else_Mode,                       -- System.Tasking
1147      RE_Simple_Mode,                     -- System.Tasking
1148      RE_Terminate_Mode,                  -- System.Tasking
1149      RE_Delay_Mode,                      -- System.Tasking
1150      RE_Task_Entry_Index,                -- System.Tasking
1151      RE_Self,                            -- System.Tasking
1152
1153      RE_Master_Id,                       -- System.Tasking
1154      RE_Unspecified_Priority,            -- System.Tasking
1155
1156      RE_Activation_Chain,                -- System.Tasking
1157
1158      RE_Abort_Defer,                     -- System.Soft_Links
1159      RE_Abort_Undefer,                   -- System.Soft_Links
1160      RE_Complete_Master,                 -- System.Soft_Links
1161      RE_Current_Master,                  -- System.Soft_Links
1162      RE_Enter_Master,                    -- System.Soft_Links
1163      RE_Get_Current_Excep,               -- System.Soft_Links
1164      RE_Get_GNAT_Exception,              -- System.Soft_Links
1165      RE_Update_Exception,                -- System.Soft_Links
1166
1167      RE_Bits_1,                          -- System.Unsigned_Types
1168      RE_Bits_2,                          -- System.Unsigned_Types
1169      RE_Bits_4,                          -- System.Unsigned_Types
1170      RE_Float_Unsigned,                  -- System.Unsigned_Types
1171      RE_Long_Unsigned,                   -- System.Unsigned_Types
1172      RE_Long_Long_Unsigned,              -- System.Unsigned_Types
1173      RE_Packed_Byte,                     -- System.Unsigned_Types
1174      RE_Packed_Bytes1,                   -- System.Unsigned_Types
1175      RE_Packed_Bytes2,                   -- System.Unsigned_Types
1176      RE_Packed_Bytes4,                   -- System.Unsigned_Types
1177      RE_Short_Unsigned,                  -- System.Unsigned_Types
1178      RE_Short_Short_Unsigned,            -- System.Unsigned_Types
1179      RE_Unsigned,                        -- System.Unsigned_Types
1180
1181      RE_Value_Boolean,                   -- System.Val_Bool
1182
1183      RE_Value_Character,                 -- System.Val_Char
1184
1185      RE_Value_Decimal,                   -- System.Val_Dec
1186
1187      RE_Value_Enumeration_8,             -- System.Val_Enum
1188      RE_Value_Enumeration_16,            -- System.Val_Enum
1189      RE_Value_Enumeration_32,            -- System.Val_Enum
1190
1191      RE_Value_Integer,                   -- System.Val_Int
1192
1193      RE_Value_Long_Long_Decimal,         -- System.Val_LLD
1194
1195      RE_Value_Long_Long_Integer,         -- System.Val_LLI
1196
1197      RE_Value_Long_Long_Unsigned,        -- System.Val_LLU
1198
1199      RE_Value_Real,                      -- System.Val_Real
1200
1201      RE_Value_Unsigned,                  -- System.Val_Uns
1202
1203      RE_Value_Wide_Character,            -- System.Val_WChar
1204
1205      RE_D,                               -- System.Vax_Float_Operations
1206      RE_F,                               -- System.Vax_Float_Operations
1207      RE_G,                               -- System.Vax_Float_Operations
1208      RE_Q,                               -- System.Vax_Float_Operations
1209      RE_S,                               -- System.Vax_Float_Operations
1210      RE_T,                               -- System.Vax_Float_Operations
1211
1212      RE_D_To_G,                          -- System.Vax_Float_Operations
1213      RE_F_To_G,                          -- System.Vax_Float_Operations
1214      RE_F_To_Q,                          -- System.Vax_Float_Operations
1215      RE_F_To_S,                          -- System.Vax_Float_Operations
1216      RE_G_To_D,                          -- System.Vax_Float_Operations
1217      RE_G_To_F,                          -- System.Vax_Float_Operations
1218      RE_G_To_Q,                          -- System.Vax_Float_Operations
1219      RE_G_To_T,                          -- System.Vax_Float_Operations
1220      RE_Q_To_F,                          -- System.Vax_Float_Operations
1221      RE_Q_To_G,                          -- System.Vax_Float_Operations
1222      RE_S_To_F,                          -- System.Vax_Float_Operations
1223      RE_T_To_D,                          -- System.Vax_Float_Operations
1224      RE_T_To_G,                          -- System.Vax_Float_Operations
1225
1226      RE_Abs_F,                           -- System.Vax_Float_Operations
1227      RE_Abs_G,                           -- System.Vax_Float_Operations
1228      RE_Add_F,                           -- System.Vax_Float_Operations
1229      RE_Add_G,                           -- System.Vax_Float_Operations
1230      RE_Div_F,                           -- System.Vax_Float_Operations
1231      RE_Div_G,                           -- System.Vax_Float_Operations
1232      RE_Mul_F,                           -- System.Vax_Float_Operations
1233      RE_Mul_G,                           -- System.Vax_Float_Operations
1234      RE_Neg_F,                           -- System.Vax_Float_Operations
1235      RE_Neg_G,                           -- System.Vax_Float_Operations
1236      RE_Sub_F,                           -- System.Vax_Float_Operations
1237      RE_Sub_G,                           -- System.Vax_Float_Operations
1238
1239      RE_Eq_F,                            -- System.Vax_Float_Operations
1240      RE_Eq_G,                            -- System.Vax_Float_Operations
1241      RE_Le_F,                            -- System.Vax_Float_Operations
1242      RE_Le_G,                            -- System.Vax_Float_Operations
1243      RE_Lt_F,                            -- System.Vax_Float_Operations
1244      RE_Lt_G,                            -- System.Vax_Float_Operations
1245
1246      RE_Version_String,                  -- System.Version_Control
1247      RE_Get_Version_String,              -- System.Version_Control
1248
1249      RE_Register_VMS_Exception,          -- System.VMS_Exception_Table
1250
1251      RE_String_To_Wide_String,           -- System.WCh_StW
1252
1253      RE_Wide_String_To_String,           -- System.WCh_WtS
1254
1255      RE_Wide_Width_Character,            -- System.WWd_Char
1256
1257      RE_Wide_Width_Enumeration_8,        -- System.WWd_Enum
1258      RE_Wide_Width_Enumeration_16,       -- System.WWd_Enum
1259      RE_Wide_Width_Enumeration_32,       -- System.WWd_Enum
1260
1261      RE_Wide_Width_Wide_Character,       -- System.WWd_Wchar
1262
1263      RE_Width_Boolean,                   -- System.Wid_Bool
1264
1265      RE_Width_Character,                 -- System.Wid_Char
1266
1267      RE_Width_Enumeration_8,             -- System.Wid_Enum
1268      RE_Width_Enumeration_16,            -- System.Wid_Enum
1269      RE_Width_Enumeration_32,            -- System.Wid_Enum
1270
1271      RE_Width_Long_Long_Integer,         -- System.Wid_LLI
1272
1273      RE_Width_Long_Long_Unsigned,        -- System.Wid_LLU
1274
1275      RE_Width_Wide_Character,            -- System.Wid_WChar
1276
1277      RE_Protected_Entry_Body_Array,      -- Tasking.Protected_Objects.Entries
1278      RE_Protection_Entries,              -- Tasking.Protected_Objects.Entries
1279      RE_Initialize_Protection_Entries,   -- Tasking.Protected_Objects.Entries
1280      RE_Lock_Entries,                    -- Tasking.Protected_Objects.Entries
1281      RE_Lock_Read_Only_Entries,          -- Tasking.Protected_Objects.Entries
1282      RE_Unlock_Entries,                  -- Tasking.Protected_Objects.Entries
1283      RE_Communication_Block,             -- Protected_Objects.Operations
1284      RE_Protected_Entry_Call,            -- Protected_Objects.Operations
1285      RE_Service_Entries,                 -- Protected_Objects.Operations
1286      RE_Cancel_Protected_Entry_Call,     -- Protected_Objects.Operations
1287      RE_Enqueued,                        -- Protected_Objects.Operations
1288      RE_Cancelled,                       -- Protected_Objects.Operations
1289      RE_Complete_Entry_Body,             -- Protected_Objects.Operations
1290      RE_Exceptional_Complete_Entry_Body, -- Protected_Objects.Operations
1291      RE_Requeue_Protected_Entry,         -- Protected_Objects.Operations
1292      RE_Requeue_Task_To_Protected_Entry, -- Protected_Objects.Operations
1293      RE_Protected_Count,                 -- Protected_Objects.Operations
1294      RE_Protected_Entry_Caller,          -- Protected_Objects.Operations
1295      RE_Timed_Protected_Entry_Call,      -- Protected_Objects.Operations
1296
1297      RE_Protection_Entry,                -- Protected_Objects.Single_Entry
1298      RE_Initialize_Protection_Entry,     -- Protected_Objects.Single_Entry
1299      RE_Lock_Entry,                      -- Protected_Objects.Single_Entry
1300      RE_Lock_Read_Only_Entry,            -- Protected_Objects.Single_Entry
1301      RE_Unlock_Entry,                    -- Protected_Objects.Single_Entry
1302      RE_Protected_Single_Entry_Call,     -- Protected_Objects.Single_Entry
1303      RE_Service_Entry,                   -- Protected_Objects.Single_Entry
1304      RE_Complete_Single_Entry_Body,      -- Protected_Objects.Single_Entry
1305      RE_Exceptional_Complete_Single_Entry_Body,
1306      RE_Protected_Count_Entry,           -- Protected_Objects.Single_Entry
1307      RE_Protected_Single_Entry_Caller,   -- Protected_Objects.Single_Entry
1308      RE_Timed_Protected_Single_Entry_Call,
1309
1310      RE_Protected_Entry_Index,           -- System.Tasking.Protected_Objects
1311      RE_Entry_Body,                      -- System.Tasking.Protected_Objects
1312      RE_Protection,                      -- System.Tasking.Protected_Objects
1313      RE_Initialize_Protection,           -- System.Tasking.Protected_Objects
1314      RE_Finalize_Protection,             -- System.Tasking.Protected_Objects
1315      RE_Lock,                            -- System.Tasking.Protected_Objects
1316      RE_Lock_Read_Only,                  -- System.Tasking.Protected_Objects
1317      RE_Unlock,                          -- System.Tasking.Protected_Objects
1318
1319      RE_Delay_Block,                     -- System.Tasking.Async_Delays
1320      RE_Timed_Out,                       -- System.Tasking.Async_Delays
1321      RE_Cancel_Async_Delay,              -- System.Tasking.Async_Delays
1322      RE_Enqueue_Duration,                -- System.Tasking.Async_Delays
1323      RE_Enqueue_Calendar,                -- System.Tasking.Async_Delays
1324      RE_Enqueue_RT,                      -- System.Tasking.Async_Delays
1325
1326      RE_Accept_Call,                     -- System.Tasking.Rendezvous
1327      RE_Accept_Trivial,                  -- System.Tasking.Rendezvous
1328      RE_Callable,                        -- System.Tasking.Rendezvous
1329      RE_Call_Simple,                     -- System.Tasking.Rendezvous
1330      RE_Requeue_Task_Entry,              -- System.Tasking.Rendezvous
1331      RE_Requeue_Protected_To_Task_Entry, -- System.Tasking.Rendezvous
1332      RE_Cancel_Task_Entry_Call,          -- System.Tasking.Rendezvous
1333      RE_Complete_Rendezvous,             -- System.Tasking.Rendezvous
1334      RE_Task_Count,                      -- System.Tasking.Rendezvous
1335      RE_Exceptional_Complete_Rendezvous, -- System.Tasking.Rendezvous
1336      RE_Selective_Wait,                  -- System.Tasking.Rendezvous
1337      RE_Task_Entry_Call,                 -- System.Tasking.Rendezvous
1338      RE_Task_Entry_Caller,               -- System.Tasking.Rendezvous
1339      RE_Timed_Task_Entry_Call,           -- System.Tasking.Rendezvous
1340      RE_Timed_Selective_Wait,            -- System.Tasking.Rendezvous
1341
1342      RE_Activate_Restricted_Tasks,       -- System.Tasking.Restricted.Stages
1343      RE_Complete_Restricted_Activation,  -- System.Tasking.Restricted.Stages
1344      RE_Create_Restricted_Task,          -- System.Tasking.Restricted.Stages
1345      RE_Complete_Restricted_Task,        -- System.Tasking.Restricted.Stages
1346      RE_Restricted_Terminated,           -- System.Tasking.Restricted.Stages
1347
1348      RE_Abort_Tasks,                     -- System.Tasking.Stages
1349      RE_Activate_Tasks,                  -- System.Tasking.Stages
1350      RE_Complete_Activation,             -- System.Tasking.Stages
1351      RE_Create_Task,                     -- System.Tasking.Stages
1352      RE_Complete_Task,                   -- System.Tasking.Stages
1353      RE_Free_Task,                       -- System.Tasking.Stages
1354      RE_Expunge_Unactivated_Tasks,       -- System.Tasking.Stages
1355      RE_Terminated);                     -- System.Tasking.Stages
1356
1357    --  The following declarations build a table that is indexed by the
1358    --  RTE function to determine the unit containing the given entity.
1359    --  This table is sorted in order of package names.
1360
1361    RE_Unit_Table : array (RE_Id) of RTU_Id := (
1362
1363      RE_Null                             => RTU_Null,
1364
1365      RE_Exceptions_Available_In_HIE      => Ada_Exceptions,
1366      RE_Code_Loc                         => Ada_Exceptions,
1367      RE_Current_Target_Exception         => Ada_Exceptions, -- of JGNAT
1368      RE_Exception_Id                     => Ada_Exceptions,
1369      RE_Exception_Information            => Ada_Exceptions,
1370      RE_Exception_Message                => Ada_Exceptions,
1371      RE_Exception_Name_Simple            => Ada_Exceptions,
1372      RE_Exception_Occurrence             => Ada_Exceptions,
1373      RE_Null_Id                          => Ada_Exceptions,
1374      RE_Null_Occurrence                  => Ada_Exceptions,
1375      RE_Poll                             => Ada_Exceptions,
1376      RE_Raise_Exception                  => Ada_Exceptions,
1377      RE_Raise_Exception_Always           => Ada_Exceptions,
1378      RE_Reraise_Occurrence               => Ada_Exceptions,
1379      RE_Reraise_Occurrence_Always        => Ada_Exceptions,
1380      RE_Reraise_Occurrence_No_Defer      => Ada_Exceptions,
1381      RE_Save_Occurrence                  => Ada_Exceptions,
1382
1383      RE_Simple_List_Controller           => Ada_Finalization_List_Controller,
1384      RE_List_Controller                  => Ada_Finalization_List_Controller,
1385
1386      RE_Interrupt_ID                     => Ada_Interrupts,
1387
1388      RE_Names                            => Ada_Interrupts_Names,
1389
1390      RE_Root_Stream_Type                 => Ada_Streams,
1391      RE_Stream_Element                   => Ada_Streams,
1392      RE_Stream_Element_Count             => Ada_Streams,
1393      RE_Stream_Element_Offset            => Ada_Streams,
1394      RE_Stream_Element_Array             => Ada_Streams,
1395
1396      RE_Stream_Access                    => Ada_Streams_Stream_IO,
1397
1398      RE_CW_Membership                    => Ada_Tags,
1399      RE_DT_Entry_Size                    => Ada_Tags,
1400      RE_DT_Prologue_Size                 => Ada_Tags,
1401      RE_External_Tag                     => Ada_Tags,
1402      RE_Get_Expanded_Name                => Ada_Tags,
1403      RE_Get_External_Tag                 => Ada_Tags,
1404      RE_Get_Prim_Op_Address              => Ada_Tags,
1405      RE_Get_RC_Offset                    => Ada_Tags,
1406      RE_Get_Remotely_Callable            => Ada_Tags,
1407      RE_Get_TSD                          => Ada_Tags,
1408      RE_Inherit_DT                       => Ada_Tags,
1409      RE_Inherit_TSD                      => Ada_Tags,
1410      RE_Internal_Tag                     => Ada_Tags,
1411      RE_Register_Tag                     => Ada_Tags,
1412      RE_Set_Expanded_Name                => Ada_Tags,
1413      RE_Set_External_Tag                 => Ada_Tags,
1414      RE_Set_Prim_Op_Address              => Ada_Tags,
1415      RE_Set_RC_Offset                    => Ada_Tags,
1416      RE_Set_Remotely_Callable            => Ada_Tags,
1417      RE_Set_TSD                          => Ada_Tags,
1418      RE_Tag_Error                        => Ada_Tags,
1419      RE_TSD_Entry_Size                   => Ada_Tags,
1420      RE_TSD_Prologue_Size                => Ada_Tags,
1421      RE_Tag                              => Ada_Tags,
1422      RE_Address_Array                    => Ada_Tags,
1423
1424      RE_Abort_Task                       => Ada_Task_Identification,
1425      RE_Current_Task                     => Ada_Task_Identification,
1426      RO_AT_Task_ID                       => Ada_Task_Identification,
1427
1428      RO_CA_Time                          => Ada_Calendar,
1429      RO_CA_Delay_For                     => Ada_Calendar_Delays,
1430      RO_CA_Delay_Until                   => Ada_Calendar_Delays,
1431      RO_CA_To_Duration                   => Ada_Calendar_Delays,
1432
1433      RO_RT_Time                          => Ada_Real_Time,
1434      RO_RT_Delay_Until                   => Ada_Real_Time_Delays,
1435      RO_RT_To_Duration                   => Ada_Real_Time_Delays,
1436
1437      RE_Integer_64                       => Interfaces,
1438      RE_Unsigned_8                       => Interfaces,
1439      RE_Unsigned_16                      => Interfaces,
1440      RE_Unsigned_32                      => Interfaces,
1441      RE_Unsigned_64                      => Interfaces,
1442
1443      RE_Vtable_Ptr                       => Interfaces_CPP,
1444      RE_Displaced_This                   => Interfaces_CPP,
1445      RE_CPP_CW_Membership                => Interfaces_CPP,
1446      RE_CPP_DT_Entry_Size                => Interfaces_CPP,
1447      RE_CPP_DT_Prologue_Size             => Interfaces_CPP,
1448      RE_CPP_Get_Expanded_Name            => Interfaces_CPP,
1449      RE_CPP_Get_External_Tag             => Interfaces_CPP,
1450      RE_CPP_Get_Prim_Op_Address          => Interfaces_CPP,
1451      RE_CPP_Get_RC_Offset                => Interfaces_CPP,
1452      RE_CPP_Get_Remotely_Callable        => Interfaces_CPP,
1453      RE_CPP_Get_TSD                      => Interfaces_CPP,
1454      RE_CPP_Inherit_DT                   => Interfaces_CPP,
1455      RE_CPP_Inherit_TSD                  => Interfaces_CPP,
1456      RE_CPP_Register_Tag                 => Interfaces_CPP,
1457      RE_CPP_Set_Expanded_Name            => Interfaces_CPP,
1458      RE_CPP_Set_External_Tag             => Interfaces_CPP,
1459      RE_CPP_Set_Prim_Op_Address          => Interfaces_CPP,
1460      RE_CPP_Set_RC_Offset                => Interfaces_CPP,
1461      RE_CPP_Set_Remotely_Callable        => Interfaces_CPP,
1462      RE_CPP_Set_TSD                      => Interfaces_CPP,
1463      RE_CPP_TSD_Entry_Size               => Interfaces_CPP,
1464      RE_CPP_TSD_Prologue_Size            => Interfaces_CPP,
1465
1466      RE_Packed_Size                      => Interfaces_Packed_Decimal,
1467      RE_Packed_To_Int32                  => Interfaces_Packed_Decimal,
1468      RE_Packed_To_Int64                  => Interfaces_Packed_Decimal,
1469      RE_Int32_To_Packed                  => Interfaces_Packed_Decimal,
1470      RE_Int64_To_Packed                  => Interfaces_Packed_Decimal,
1471
1472      RE_Address                          => System,
1473      RE_Any_Priority                     => System,
1474      RE_Bit_Order                        => System,
1475      RE_Default_Priority                 => System,
1476      RE_High_Order_First                 => System,
1477      RE_Interrupt_Priority               => System,
1478      RE_Lib_Stop                         => System,
1479      RE_Low_Order_First                  => System,
1480      RE_Max_Interrupt_Priority           => System,
1481      RE_Max_Priority                     => System,
1482      RE_Null_Address                     => System,
1483      RE_Priority                         => System,
1484
1485      RE_Add_With_Ovflo_Check             => System_Arith_64,
1486      RE_Double_Divide                    => System_Arith_64,
1487      RE_Multiply_With_Ovflo_Check        => System_Arith_64,
1488      RE_Scaled_Divide                    => System_Arith_64,
1489      RE_Subtract_With_Ovflo_Check        => System_Arith_64,
1490
1491      RE_Create_AST_Handler               => System_AST_Handling,
1492
1493      RE_Raise_Assert_Failure             => System_Assertions,
1494
1495      RE_AST_Handler                      => System_Aux_DEC,
1496      RE_Import_Value                     => System_Aux_DEC,
1497      RE_No_AST_Handler                   => System_Aux_DEC,
1498      RE_Type_Class                       => System_Aux_DEC,
1499      RE_Type_Class_Enumeration           => System_Aux_DEC,
1500      RE_Type_Class_Integer               => System_Aux_DEC,
1501      RE_Type_Class_Fixed_Point           => System_Aux_DEC,
1502      RE_Type_Class_Floating_Point        => System_Aux_DEC,
1503      RE_Type_Class_Array                 => System_Aux_DEC,
1504      RE_Type_Class_Record                => System_Aux_DEC,
1505      RE_Type_Class_Access                => System_Aux_DEC,
1506      RE_Type_Class_Task                  => System_Aux_DEC,
1507      RE_Type_Class_Address               => System_Aux_DEC,
1508
1509      RE_Bit_And                          => System_Bit_Ops,
1510      RE_Bit_Eq                           => System_Bit_Ops,
1511      RE_Bit_Not                          => System_Bit_Ops,
1512      RE_Bit_Or                           => System_Bit_Ops,
1513      RE_Bit_Xor                          => System_Bit_Ops,
1514
1515      RE_Checked_Pool                     => System_Checked_Pools,
1516
1517      RE_Boolean_Array                    => System_Boolean_Array_Operations,
1518      RE_Vector_Not                       => System_Boolean_Array_Operations,
1519      RE_Vector_And                       => System_Boolean_Array_Operations,
1520      RE_Vector_Or                        => System_Boolean_Array_Operations,
1521      RE_Vector_Nand                      => System_Boolean_Array_Operations,
1522      RE_Vector_Nor                       => System_Boolean_Array_Operations,
1523      RE_Vector_Nxor                      => System_Boolean_Array_Operations,
1524      RE_Vector_Xor                       => System_Boolean_Array_Operations,
1525
1526      RE_Compare_Array_S8                 => System_Compare_Array_Signed_8,
1527      RE_Compare_Array_S8_Unaligned       => System_Compare_Array_Signed_8,
1528
1529      RE_Compare_Array_S16                => System_Compare_Array_Signed_16,
1530
1531      RE_Compare_Array_S32                => System_Compare_Array_Signed_32,
1532
1533      RE_Compare_Array_S64                => System_Compare_Array_Signed_64,
1534
1535      RE_Compare_Array_U8                 => System_Compare_Array_Unsigned_8,
1536      RE_Compare_Array_U8_Unaligned       => System_Compare_Array_Unsigned_8,
1537
1538      RE_Compare_Array_U16                => System_Compare_Array_Unsigned_16,
1539
1540      RE_Compare_Array_U32                => System_Compare_Array_Unsigned_32,
1541
1542      RE_Compare_Array_U64                => System_Compare_Array_Unsigned_64,
1543
1544      RE_Register_Exception               => System_Exception_Table,
1545
1546      RE_All_Others_Id                    => System_Exceptions,
1547      RE_Handler_Record                   => System_Exceptions,
1548      RE_Handler_Record_Ptr               => System_Exceptions,
1549      RE_Others_Id                        => System_Exceptions,
1550      RE_Subprogram_Descriptor            => System_Exceptions,
1551      RE_Subprogram_Descriptor_0          => System_Exceptions,
1552      RE_Subprogram_Descriptor_1          => System_Exceptions,
1553      RE_Subprogram_Descriptor_2          => System_Exceptions,
1554      RE_Subprogram_Descriptor_3          => System_Exceptions,
1555      RE_Subprogram_Descriptor_List       => System_Exceptions,
1556      RE_Subprogram_Descriptor_Ptr        => System_Exceptions,
1557      RE_Subprogram_Descriptors_Record    => System_Exceptions,
1558      RE_Subprogram_Descriptors_Ptr       => System_Exceptions,
1559
1560      RE_Exn_Integer                      => System_Exn_Int,
1561
1562      RE_Exn_Long_Long_Float              => System_Exn_LLF,
1563
1564      RE_Exn_Long_Long_Integer            => System_Exn_LLI,
1565
1566      RE_Exp_Integer                      => System_Exp_Int,
1567
1568      RE_Exp_Long_Long_Integer            => System_Exp_LLI,
1569
1570      RE_Exp_Long_Long_Unsigned           => System_Exp_LLU,
1571
1572      RE_Exp_Modular                      => System_Exp_Mod,
1573
1574      RE_Exp_Unsigned                     => System_Exp_Uns,
1575
1576      RE_Fat_Float                        => System_Fat_Flt,
1577
1578      RE_Fat_Long_Float                   => System_Fat_LFlt,
1579
1580      RE_Fat_Long_Long_Float              => System_Fat_LLF,
1581
1582      RE_Fat_Short_Float                  => System_Fat_SFlt,
1583
1584      RE_Attach_To_Final_List             => System_Finalization_Implementation,
1585      RE_Finalize_List                    => System_Finalization_Implementation,
1586      RE_Finalize_One                     => System_Finalization_Implementation,
1587      RE_Global_Final_List                => System_Finalization_Implementation,
1588      RE_Record_Controller                => System_Finalization_Implementation,
1589      RE_Limited_Record_Controller        => System_Finalization_Implementation,
1590      RE_Deep_Tag_Initialize              => System_Finalization_Implementation,
1591      RE_Deep_Tag_Adjust                  => System_Finalization_Implementation,
1592      RE_Deep_Tag_Finalize                => System_Finalization_Implementation,
1593      RE_Deep_Tag_Attach                  => System_Finalization_Implementation,
1594      RE_Deep_Rec_Initialize              => System_Finalization_Implementation,
1595      RE_Deep_Rec_Adjust                  => System_Finalization_Implementation,
1596      RE_Deep_Rec_Finalize                => System_Finalization_Implementation,
1597
1598      RE_Root_Controlled                  => System_Finalization_Root,
1599      RE_Finalizable                      => System_Finalization_Root,
1600      RE_Finalizable_Ptr                  => System_Finalization_Root,
1601
1602      RE_Fore                             => System_Fore,
1603
1604      RE_Image_Boolean                    => System_Img_Bool,
1605
1606      RE_Image_Character                  => System_Img_Char,
1607
1608      RE_Image_Decimal                    => System_Img_Dec,
1609
1610      RE_Image_Enumeration_8              => System_Img_Enum,
1611      RE_Image_Enumeration_16             => System_Img_Enum,
1612      RE_Image_Enumeration_32             => System_Img_Enum,
1613
1614      RE_Image_Integer                    => System_Img_Int,
1615
1616      RE_Image_Long_Long_Decimal          => System_Img_LLD,
1617
1618      RE_Image_Long_Long_Integer          => System_Img_LLI,
1619
1620      RE_Image_Long_Long_Unsigned         => System_Img_LLU,
1621
1622      RE_Image_Ordinary_Fixed_Point       => System_Img_Real,
1623      RE_Image_Floating_Point             => System_Img_Real,
1624
1625      RE_Image_Unsigned                   => System_Img_Uns,
1626
1627      RE_Image_Wide_Character             => System_Img_WChar,
1628
1629      RE_Bind_Interrupt_To_Entry          => System_Interrupts,
1630      RE_Default_Interrupt_Priority       => System_Interrupts,
1631      RE_Dynamic_Interrupt_Protection     => System_Interrupts,
1632      RE_Install_Handlers                 => System_Interrupts,
1633      RE_Register_Interrupt_Handler       => System_Interrupts,
1634      RE_Static_Interrupt_Protection      => System_Interrupts,
1635      RE_System_Interrupt_Id              => System_Interrupts,
1636
1637      RE_Asm_Insn                         => System_Machine_Code,
1638      RE_Asm_Input_Operand                => System_Machine_Code,
1639      RE_Asm_Output_Operand               => System_Machine_Code,
1640
1641      RE_Mantissa_Value                   => System_Mantissa,
1642
1643      RE_memcpy                           => System_Memcop,
1644      RE_memmove                          => System_Memcop,
1645
1646      RE_Bits_03                          => System_Pack_03,
1647      RE_Get_03                           => System_Pack_03,
1648      RE_Set_03                           => System_Pack_03,
1649
1650      RE_Bits_05                          => System_Pack_05,
1651      RE_Get_05                           => System_Pack_05,
1652      RE_Set_05                           => System_Pack_05,
1653
1654      RE_Bits_06                          => System_Pack_06,
1655      RE_Get_06                           => System_Pack_06,
1656      RE_GetU_06                          => System_Pack_06,
1657      RE_Set_06                           => System_Pack_06,
1658      RE_SetU_06                          => System_Pack_06,
1659
1660      RE_Bits_07                          => System_Pack_07,
1661      RE_Get_07                           => System_Pack_07,
1662      RE_Set_07                           => System_Pack_07,
1663
1664      RE_Bits_09                          => System_Pack_09,
1665      RE_Get_09                           => System_Pack_09,
1666      RE_Set_09                           => System_Pack_09,
1667
1668      RE_Bits_10                          => System_Pack_10,
1669      RE_Get_10                           => System_Pack_10,
1670      RE_GetU_10                          => System_Pack_10,
1671      RE_Set_10                           => System_Pack_10,
1672      RE_SetU_10                          => System_Pack_10,
1673
1674      RE_Bits_11                          => System_Pack_11,
1675      RE_Get_11                           => System_Pack_11,
1676      RE_Set_11                           => System_Pack_11,
1677
1678      RE_Bits_12                          => System_Pack_12,
1679      RE_Get_12                           => System_Pack_12,
1680      RE_GetU_12                          => System_Pack_12,
1681      RE_Set_12                           => System_Pack_12,
1682      RE_SetU_12                          => System_Pack_12,
1683
1684      RE_Bits_13                          => System_Pack_13,
1685      RE_Get_13                           => System_Pack_13,
1686      RE_Set_13                           => System_Pack_13,
1687
1688      RE_Bits_14                          => System_Pack_14,
1689      RE_Get_14                           => System_Pack_14,
1690      RE_GetU_14                          => System_Pack_14,
1691      RE_Set_14                           => System_Pack_14,
1692      RE_SetU_14                          => System_Pack_14,
1693
1694      RE_Bits_15                          => System_Pack_15,
1695      RE_Get_15                           => System_Pack_15,
1696      RE_Set_15                           => System_Pack_15,
1697
1698      RE_Bits_17                          => System_Pack_17,
1699      RE_Get_17                           => System_Pack_17,
1700      RE_Set_17                           => System_Pack_17,
1701
1702      RE_Bits_18                          => System_Pack_18,
1703      RE_Get_18                           => System_Pack_18,
1704      RE_GetU_18                          => System_Pack_18,
1705      RE_Set_18                           => System_Pack_18,
1706      RE_SetU_18                          => System_Pack_18,
1707
1708      RE_Bits_19                          => System_Pack_19,
1709      RE_Get_19                           => System_Pack_19,
1710      RE_Set_19                           => System_Pack_19,
1711
1712      RE_Bits_20                          => System_Pack_20,
1713      RE_Get_20                           => System_Pack_20,
1714      RE_GetU_20                          => System_Pack_20,
1715      RE_Set_20                           => System_Pack_20,
1716      RE_SetU_20                          => System_Pack_20,
1717
1718      RE_Bits_21                          => System_Pack_21,
1719      RE_Get_21                           => System_Pack_21,
1720      RE_Set_21                           => System_Pack_21,
1721
1722      RE_Bits_22                          => System_Pack_22,
1723      RE_Get_22                           => System_Pack_22,
1724      RE_GetU_22                          => System_Pack_22,
1725      RE_Set_22                           => System_Pack_22,
1726      RE_SetU_22                          => System_Pack_22,
1727
1728      RE_Bits_23                          => System_Pack_23,
1729      RE_Get_23                           => System_Pack_23,
1730      RE_Set_23                           => System_Pack_23,
1731
1732      RE_Bits_24                          => System_Pack_24,
1733      RE_Get_24                           => System_Pack_24,
1734      RE_GetU_24                          => System_Pack_24,
1735      RE_Set_24                           => System_Pack_24,
1736      RE_SetU_24                          => System_Pack_24,
1737
1738      RE_Bits_25                          => System_Pack_25,
1739      RE_Get_25                           => System_Pack_25,
1740      RE_Set_25                           => System_Pack_25,
1741
1742      RE_Bits_26                          => System_Pack_26,
1743      RE_Get_26                           => System_Pack_26,
1744      RE_GetU_26                          => System_Pack_26,
1745      RE_Set_26                           => System_Pack_26,
1746      RE_SetU_26                          => System_Pack_26,
1747
1748      RE_Bits_27                          => System_Pack_27,
1749      RE_Get_27                           => System_Pack_27,
1750      RE_Set_27                           => System_Pack_27,
1751
1752      RE_Bits_28                          => System_Pack_28,
1753      RE_Get_28                           => System_Pack_28,
1754      RE_GetU_28                          => System_Pack_28,
1755      RE_Set_28                           => System_Pack_28,
1756      RE_SetU_28                          => System_Pack_28,
1757
1758      RE_Bits_29                          => System_Pack_29,
1759      RE_Get_29                           => System_Pack_29,
1760      RE_Set_29                           => System_Pack_29,
1761
1762      RE_Bits_30                          => System_Pack_30,
1763      RE_Get_30                           => System_Pack_30,
1764      RE_GetU_30                          => System_Pack_30,
1765      RE_Set_30                           => System_Pack_30,
1766      RE_SetU_30                          => System_Pack_30,
1767
1768      RE_Bits_31                          => System_Pack_31,
1769      RE_Get_31                           => System_Pack_31,
1770      RE_Set_31                           => System_Pack_31,
1771
1772      RE_Bits_33                          => System_Pack_33,
1773      RE_Get_33                           => System_Pack_33,
1774      RE_Set_33                           => System_Pack_33,
1775
1776      RE_Bits_34                          => System_Pack_34,
1777      RE_Get_34                           => System_Pack_34,
1778      RE_GetU_34                          => System_Pack_34,
1779      RE_Set_34                           => System_Pack_34,
1780      RE_SetU_34                          => System_Pack_34,
1781
1782      RE_Bits_35                          => System_Pack_35,
1783      RE_Get_35                           => System_Pack_35,
1784      RE_Set_35                           => System_Pack_35,
1785
1786      RE_Bits_36                          => System_Pack_36,
1787      RE_Get_36                           => System_Pack_36,
1788      RE_GetU_36                          => System_Pack_36,
1789      RE_Set_36                           => System_Pack_36,
1790      RE_SetU_36                          => System_Pack_36,
1791
1792      RE_Bits_37                          => System_Pack_37,
1793      RE_Get_37                           => System_Pack_37,
1794      RE_Set_37                           => System_Pack_37,
1795
1796      RE_Bits_38                          => System_Pack_38,
1797      RE_Get_38                           => System_Pack_38,
1798      RE_GetU_38                          => System_Pack_38,
1799      RE_Set_38                           => System_Pack_38,
1800      RE_SetU_38                          => System_Pack_38,
1801
1802      RE_Bits_39                          => System_Pack_39,
1803      RE_Get_39                           => System_Pack_39,
1804      RE_Set_39                           => System_Pack_39,
1805
1806      RE_Bits_40                          => System_Pack_40,
1807      RE_Get_40                           => System_Pack_40,
1808      RE_GetU_40                          => System_Pack_40,
1809      RE_Set_40                           => System_Pack_40,
1810      RE_SetU_40                          => System_Pack_40,
1811
1812      RE_Bits_41                          => System_Pack_41,
1813      RE_Get_41                           => System_Pack_41,
1814      RE_Set_41                           => System_Pack_41,
1815
1816      RE_Bits_42                          => System_Pack_42,
1817      RE_Get_42                           => System_Pack_42,
1818      RE_GetU_42                          => System_Pack_42,
1819      RE_Set_42                           => System_Pack_42,
1820      RE_SetU_42                          => System_Pack_42,
1821
1822      RE_Bits_43                          => System_Pack_43,
1823      RE_Get_43                           => System_Pack_43,
1824      RE_Set_43                           => System_Pack_43,
1825
1826      RE_Bits_44                          => System_Pack_44,
1827      RE_Get_44                           => System_Pack_44,
1828      RE_GetU_44                          => System_Pack_44,
1829      RE_Set_44                           => System_Pack_44,
1830      RE_SetU_44                          => System_Pack_44,
1831
1832      RE_Bits_45                          => System_Pack_45,
1833      RE_Get_45                           => System_Pack_45,
1834      RE_Set_45                           => System_Pack_45,
1835
1836      RE_Bits_46                          => System_Pack_46,
1837      RE_Get_46                           => System_Pack_46,
1838      RE_GetU_46                          => System_Pack_46,
1839      RE_Set_46                           => System_Pack_46,
1840      RE_SetU_46                          => System_Pack_46,
1841
1842      RE_Bits_47                          => System_Pack_47,
1843      RE_Get_47                           => System_Pack_47,
1844      RE_Set_47                           => System_Pack_47,
1845
1846      RE_Bits_48                          => System_Pack_48,
1847      RE_Get_48                           => System_Pack_48,
1848      RE_GetU_48                          => System_Pack_48,
1849      RE_Set_48                           => System_Pack_48,
1850      RE_SetU_48                          => System_Pack_48,
1851
1852      RE_Bits_49                          => System_Pack_49,
1853      RE_Get_49                           => System_Pack_49,
1854      RE_Set_49                           => System_Pack_49,
1855
1856      RE_Bits_50                          => System_Pack_50,
1857      RE_Get_50                           => System_Pack_50,
1858      RE_GetU_50                          => System_Pack_50,
1859      RE_Set_50                           => System_Pack_50,
1860      RE_SetU_50                          => System_Pack_50,
1861
1862      RE_Bits_51                          => System_Pack_51,
1863      RE_Get_51                           => System_Pack_51,
1864      RE_Set_51                           => System_Pack_51,
1865
1866      RE_Bits_52                          => System_Pack_52,
1867      RE_Get_52                           => System_Pack_52,
1868      RE_GetU_52                          => System_Pack_52,
1869      RE_Set_52                           => System_Pack_52,
1870      RE_SetU_52                          => System_Pack_52,
1871
1872      RE_Bits_53                          => System_Pack_53,
1873      RE_Get_53                           => System_Pack_53,
1874      RE_Set_53                           => System_Pack_53,
1875
1876      RE_Bits_54                          => System_Pack_54,
1877      RE_Get_54                           => System_Pack_54,
1878      RE_GetU_54                          => System_Pack_54,
1879      RE_Set_54                           => System_Pack_54,
1880      RE_SetU_54                          => System_Pack_54,
1881
1882      RE_Bits_55                          => System_Pack_55,
1883      RE_Get_55                           => System_Pack_55,
1884      RE_Set_55                           => System_Pack_55,
1885
1886      RE_Bits_56                          => System_Pack_56,
1887      RE_Get_56                           => System_Pack_56,
1888      RE_GetU_56                          => System_Pack_56,
1889      RE_Set_56                           => System_Pack_56,
1890      RE_SetU_56                          => System_Pack_56,
1891
1892      RE_Bits_57                          => System_Pack_57,
1893      RE_Get_57                           => System_Pack_57,
1894      RE_Set_57                           => System_Pack_57,
1895
1896      RE_Bits_58                          => System_Pack_58,
1897      RE_Get_58                           => System_Pack_58,
1898      RE_GetU_58                          => System_Pack_58,
1899      RE_Set_58                           => System_Pack_58,
1900      RE_SetU_58                          => System_Pack_58,
1901
1902      RE_Bits_59                          => System_Pack_59,
1903      RE_Get_59                           => System_Pack_59,
1904      RE_Set_59                           => System_Pack_59,
1905
1906      RE_Bits_60                          => System_Pack_60,
1907      RE_Get_60                           => System_Pack_60,
1908      RE_GetU_60                          => System_Pack_60,
1909      RE_Set_60                           => System_Pack_60,
1910      RE_SetU_60                          => System_Pack_60,
1911
1912      RE_Bits_61                          => System_Pack_61,
1913      RE_Get_61                           => System_Pack_61,
1914      RE_Set_61                           => System_Pack_61,
1915
1916      RE_Bits_62                          => System_Pack_62,
1917      RE_Get_62                           => System_Pack_62,
1918      RE_GetU_62                          => System_Pack_62,
1919      RE_Set_62                           => System_Pack_62,
1920      RE_SetU_62                          => System_Pack_62,
1921
1922      RE_Bits_63                          => System_Pack_63,
1923      RE_Get_63                           => System_Pack_63,
1924      RE_Set_63                           => System_Pack_63,
1925
1926      RE_Adjust_Storage_Size              => System_Parameters,
1927      RE_Default_Stack_Size               => System_Parameters,
1928      RE_Garbage_Collected                => System_Parameters,
1929      RE_Size_Type                        => System_Parameters,
1930      RE_Unspecified_Size                 => System_Parameters,
1931
1932      RE_Get_Active_Partition_Id          => System_Partition_Interface,
1933      RE_Get_Passive_Partition_Id         => System_Partition_Interface,
1934      RE_Get_Local_Partition_Id           => System_Partition_Interface,
1935      RE_Get_RCI_Package_Receiver         => System_Partition_Interface,
1936      RE_Get_Unique_Remote_Pointer        => System_Partition_Interface,
1937      RE_RACW_Stub_Type                   => System_Partition_Interface,
1938      RE_RACW_Stub_Type_Access            => System_Partition_Interface,
1939      RE_Raise_Program_Error_For_E_4_18   => System_Partition_Interface,
1940      RE_Raise_Program_Error_Unknown_Tag  => System_Partition_Interface,
1941      RE_Register_Passive_Package         => System_Partition_Interface,
1942      RE_Register_Receiving_Stub          => System_Partition_Interface,
1943      RE_RCI_Info                         => System_Partition_Interface,
1944      RE_Subprogram_Id                    => System_Partition_Interface,
1945
1946      RE_Global_Pool_Object               => System_Pool_Global,
1947
1948      RE_Unbounded_Reclaim_Pool           => System_Pool_Local,
1949
1950      RE_Stack_Bounded_Pool               => System_Pool_Size,
1951
1952      RE_Do_Apc                           => System_RPC,
1953      RE_Do_Rpc                           => System_RPC,
1954      RE_Params_Stream_Type               => System_RPC,
1955      RE_Partition_ID                     => System_RPC,
1956      RE_RPC_Receiver                     => System_RPC,
1957
1958      RE_IS_Is1                           => System_Scalar_Values,
1959      RE_IS_Is2                           => System_Scalar_Values,
1960      RE_IS_Is4                           => System_Scalar_Values,
1961      RE_IS_Is8                           => System_Scalar_Values,
1962      RE_IS_Iu1                           => System_Scalar_Values,
1963      RE_IS_Iu2                           => System_Scalar_Values,
1964      RE_IS_Iu4                           => System_Scalar_Values,
1965      RE_IS_Iu8                           => System_Scalar_Values,
1966      RE_IS_Isf                           => System_Scalar_Values,
1967      RE_IS_Ifl                           => System_Scalar_Values,
1968      RE_IS_Ilf                           => System_Scalar_Values,
1969      RE_IS_Ill                           => System_Scalar_Values,
1970
1971      RE_Mark_Id                          => System_Secondary_Stack,
1972      RE_SS_Allocate                      => System_Secondary_Stack,
1973      RE_SS_Mark                          => System_Secondary_Stack,
1974      RE_SS_Pool                          => System_Secondary_Stack,
1975      RE_SS_Release                       => System_Secondary_Stack,
1976
1977      RE_Shared_Var_Close                 => System_Shared_Storage,
1978      RE_Shared_Var_Lock                  => System_Shared_Storage,
1979      RE_Shared_Var_ROpen                 => System_Shared_Storage,
1980      RE_Shared_Var_Unlock                => System_Shared_Storage,
1981      RE_Shared_Var_WOpen                 => System_Shared_Storage,
1982
1983      RE_Abort_Undefer_Direct             => System_Standard_Library,
1984      RE_Exception_Data_Ptr               => System_Standard_Library,
1985
1986      RE_Integer_Address                  => System_Storage_Elements,
1987      RE_Storage_Offset                   => System_Storage_Elements,
1988      RE_Storage_Array                    => System_Storage_Elements,
1989      RE_To_Address                       => System_Storage_Elements,
1990
1991      RE_Root_Storage_Pool                => System_Storage_Pools,
1992      RE_Allocate_Any                     => System_Storage_Pools,
1993      RE_Deallocate_Any                   => System_Storage_Pools,
1994
1995      RE_Thin_Pointer                     => System_Stream_Attributes,
1996      RE_Fat_Pointer                      => System_Stream_Attributes,
1997
1998      RE_I_AD                             => System_Stream_Attributes,
1999      RE_I_AS                             => System_Stream_Attributes,
2000      RE_I_B                              => System_Stream_Attributes,
2001      RE_I_C                              => System_Stream_Attributes,
2002      RE_I_F                              => System_Stream_Attributes,
2003      RE_I_I                              => System_Stream_Attributes,
2004      RE_I_LF                             => System_Stream_Attributes,
2005      RE_I_LI                             => System_Stream_Attributes,
2006      RE_I_LLF                            => System_Stream_Attributes,
2007      RE_I_LLI                            => System_Stream_Attributes,
2008      RE_I_LLU                            => System_Stream_Attributes,
2009      RE_I_LU                             => System_Stream_Attributes,
2010      RE_I_SF                             => System_Stream_Attributes,
2011      RE_I_SI                             => System_Stream_Attributes,
2012      RE_I_SSI                            => System_Stream_Attributes,
2013      RE_I_SSU                            => System_Stream_Attributes,
2014      RE_I_SU                             => System_Stream_Attributes,
2015      RE_I_U                              => System_Stream_Attributes,
2016      RE_I_WC                             => System_Stream_Attributes,
2017
2018      RE_W_AD                             => System_Stream_Attributes,
2019      RE_W_AS                             => System_Stream_Attributes,
2020      RE_W_B                              => System_Stream_Attributes,
2021      RE_W_C                              => System_Stream_Attributes,
2022      RE_W_F                              => System_Stream_Attributes,
2023      RE_W_I                              => System_Stream_Attributes,
2024      RE_W_LF                             => System_Stream_Attributes,
2025      RE_W_LI                             => System_Stream_Attributes,
2026      RE_W_LLF                            => System_Stream_Attributes,
2027      RE_W_LLI                            => System_Stream_Attributes,
2028      RE_W_LLU                            => System_Stream_Attributes,
2029      RE_W_LU                             => System_Stream_Attributes,
2030      RE_W_SF                             => System_Stream_Attributes,
2031      RE_W_SI                             => System_Stream_Attributes,
2032      RE_W_SSI                            => System_Stream_Attributes,
2033      RE_W_SSU                            => System_Stream_Attributes,
2034      RE_W_SU                             => System_Stream_Attributes,
2035      RE_W_U                              => System_Stream_Attributes,
2036      RE_W_WC                             => System_Stream_Attributes,
2037
2038      RE_Block_Stream_Ops_OK              => System_Stream_Attributes,
2039
2040      RE_Str_Concat                       => System_String_Ops,
2041      RE_Str_Normalize                    => System_String_Ops,
2042      RE_Wide_Str_Normalize               => System_String_Ops,
2043      RE_Str_Concat_CC                    => System_String_Ops,
2044      RE_Str_Concat_CS                    => System_String_Ops,
2045      RE_Str_Concat_SC                    => System_String_Ops,
2046
2047      RE_Str_Concat_3                     => System_String_Ops_Concat_3,
2048
2049      RE_Str_Concat_4                     => System_String_Ops_Concat_4,
2050
2051      RE_Str_Concat_5                     => System_String_Ops_Concat_5,
2052
2053      RE_Task_Info_Type                   => System_Task_Info,
2054      RE_Unspecified_Task_Info            => System_Task_Info,
2055
2056      RE_Library_Task_Level               => System_Tasking,
2057
2058      RE_Task_Procedure_Access            => System_Tasking,
2059
2060      RO_ST_Task_ID                       => System_Tasking,
2061
2062      RE_Call_Modes                       => System_Tasking,
2063      RE_Simple_Call                      => System_Tasking,
2064      RE_Conditional_Call                 => System_Tasking,
2065      RE_Asynchronous_Call                => System_Tasking,
2066      RE_Timed_Call                       => System_Tasking,
2067
2068      RE_Task_List                        => System_Tasking,
2069
2070      RE_Accept_Alternative               => System_Tasking,
2071      RE_Accept_List                      => System_Tasking,
2072      RE_Accept_List_Access               => System_Tasking,
2073      RE_Max_Select                       => System_Tasking,
2074      RE_Max_Task_Entry                   => System_Tasking,
2075      RE_No_Rendezvous                    => System_Tasking,
2076      RE_Null_Task_Entry                  => System_Tasking,
2077      RE_Positive_Select_Index            => System_Tasking,
2078      RE_Select_Index                     => System_Tasking,
2079      RE_Select_Modes                     => System_Tasking,
2080      RE_Else_Mode                        => System_Tasking,
2081      RE_Simple_Mode                      => System_Tasking,
2082      RE_Terminate_Mode                   => System_Tasking,
2083      RE_Delay_Mode                       => System_Tasking,
2084      RE_Task_Entry_Index                 => System_Tasking,
2085      RE_Self                             => System_Tasking,
2086
2087      RE_Master_Id                        => System_Tasking,
2088      RE_Unspecified_Priority             => System_Tasking,
2089
2090      RE_Activation_Chain                 => System_Tasking,
2091
2092      RE_Abort_Defer                      => System_Soft_Links,
2093      RE_Abort_Undefer                    => System_Soft_Links,
2094      RE_Complete_Master                  => System_Soft_Links,
2095      RE_Current_Master                   => System_Soft_Links,
2096      RE_Enter_Master                     => System_Soft_Links,
2097      RE_Get_Current_Excep                => System_Soft_Links,
2098      RE_Get_GNAT_Exception               => System_Soft_Links,
2099      RE_Update_Exception                 => System_Soft_Links,
2100
2101      RE_Bits_1                           => System_Unsigned_Types,
2102      RE_Bits_2                           => System_Unsigned_Types,
2103      RE_Bits_4                           => System_Unsigned_Types,
2104      RE_Float_Unsigned                   => System_Unsigned_Types,
2105      RE_Long_Unsigned                    => System_Unsigned_Types,
2106      RE_Long_Long_Unsigned               => System_Unsigned_Types,
2107      RE_Packed_Byte                      => System_Unsigned_Types,
2108      RE_Packed_Bytes1                    => System_Unsigned_Types,
2109      RE_Packed_Bytes2                    => System_Unsigned_Types,
2110      RE_Packed_Bytes4                    => System_Unsigned_Types,
2111      RE_Short_Unsigned                   => System_Unsigned_Types,
2112      RE_Short_Short_Unsigned             => System_Unsigned_Types,
2113      RE_Unsigned                         => System_Unsigned_Types,
2114
2115      RE_Value_Boolean                    => System_Val_Bool,
2116
2117      RE_Value_Character                  => System_Val_Char,
2118
2119      RE_Value_Decimal                    => System_Val_Dec,
2120
2121      RE_Value_Enumeration_8              => System_Val_Enum,
2122      RE_Value_Enumeration_16             => System_Val_Enum,
2123      RE_Value_Enumeration_32             => System_Val_Enum,
2124
2125      RE_Value_Integer                    => System_Val_Int,
2126
2127      RE_Value_Long_Long_Decimal          => System_Val_LLD,
2128
2129      RE_Value_Long_Long_Integer          => System_Val_LLI,
2130
2131      RE_Value_Long_Long_Unsigned         => System_Val_LLU,
2132
2133      RE_Value_Real                       => System_Val_Real,
2134
2135      RE_Value_Unsigned                   => System_Val_Uns,
2136
2137      RE_Value_Wide_Character             => System_Val_WChar,
2138
2139      RE_D                                => System_Vax_Float_Operations,
2140      RE_F                                => System_Vax_Float_Operations,
2141      RE_G                                => System_Vax_Float_Operations,
2142      RE_Q                                => System_Vax_Float_Operations,
2143      RE_S                                => System_Vax_Float_Operations,
2144      RE_T                                => System_Vax_Float_Operations,
2145
2146      RE_D_To_G                           => System_Vax_Float_Operations,
2147      RE_F_To_G                           => System_Vax_Float_Operations,
2148      RE_F_To_Q                           => System_Vax_Float_Operations,
2149      RE_F_To_S                           => System_Vax_Float_Operations,
2150      RE_G_To_D                           => System_Vax_Float_Operations,
2151      RE_G_To_F                           => System_Vax_Float_Operations,
2152      RE_G_To_Q                           => System_Vax_Float_Operations,
2153      RE_G_To_T                           => System_Vax_Float_Operations,
2154      RE_Q_To_F                           => System_Vax_Float_Operations,
2155      RE_Q_To_G                           => System_Vax_Float_Operations,
2156      RE_S_To_F                           => System_Vax_Float_Operations,
2157      RE_T_To_D                           => System_Vax_Float_Operations,
2158      RE_T_To_G                           => System_Vax_Float_Operations,
2159
2160      RE_Abs_F                            => System_Vax_Float_Operations,
2161      RE_Abs_G                            => System_Vax_Float_Operations,
2162      RE_Add_F                            => System_Vax_Float_Operations,
2163      RE_Add_G                            => System_Vax_Float_Operations,
2164      RE_Div_F                            => System_Vax_Float_Operations,
2165      RE_Div_G                            => System_Vax_Float_Operations,
2166      RE_Mul_F                            => System_Vax_Float_Operations,
2167      RE_Mul_G                            => System_Vax_Float_Operations,
2168      RE_Neg_F                            => System_Vax_Float_Operations,
2169      RE_Neg_G                            => System_Vax_Float_Operations,
2170      RE_Sub_F                            => System_Vax_Float_Operations,
2171      RE_Sub_G                            => System_Vax_Float_Operations,
2172
2173      RE_Eq_F                             => System_Vax_Float_Operations,
2174      RE_Eq_G                             => System_Vax_Float_Operations,
2175      RE_Le_F                             => System_Vax_Float_Operations,
2176      RE_Le_G                             => System_Vax_Float_Operations,
2177      RE_Lt_F                             => System_Vax_Float_Operations,
2178      RE_Lt_G                             => System_Vax_Float_Operations,
2179
2180      RE_Version_String                   => System_Version_Control,
2181      RE_Get_Version_String               => System_Version_Control,
2182
2183      RE_Register_VMS_Exception           => System_VMS_Exception_Table,
2184
2185      RE_String_To_Wide_String            => System_WCh_StW,
2186
2187      RE_Wide_String_To_String            => System_WCh_WtS,
2188
2189      RE_Wide_Width_Character             => System_WWd_Char,
2190
2191      RE_Wide_Width_Enumeration_8         => System_WWd_Enum,
2192      RE_Wide_Width_Enumeration_16        => System_WWd_Enum,
2193      RE_Wide_Width_Enumeration_32        => System_WWd_Enum,
2194
2195      RE_Wide_Width_Wide_Character        => System_WWd_Wchar,
2196
2197      RE_Width_Boolean                    => System_Wid_Bool,
2198
2199      RE_Width_Character                  => System_Wid_Char,
2200
2201      RE_Width_Enumeration_8              => System_Wid_Enum,
2202      RE_Width_Enumeration_16             => System_Wid_Enum,
2203      RE_Width_Enumeration_32             => System_Wid_Enum,
2204
2205      RE_Width_Long_Long_Integer          => System_Wid_LLI,
2206
2207      RE_Width_Long_Long_Unsigned         => System_Wid_LLU,
2208
2209      RE_Width_Wide_Character             => System_Wid_WChar,
2210
2211      RE_Protected_Entry_Body_Array       =>
2212        System_Tasking_Protected_Objects_Entries,
2213      RE_Protection_Entries               =>
2214        System_Tasking_Protected_Objects_Entries,
2215      RE_Initialize_Protection_Entries    =>
2216        System_Tasking_Protected_Objects_Entries,
2217      RE_Lock_Entries                     =>
2218        System_Tasking_Protected_Objects_Entries,
2219      RE_Lock_Read_Only_Entries           =>
2220        System_Tasking_Protected_Objects_Entries,
2221      RE_Unlock_Entries                   =>
2222        System_Tasking_Protected_Objects_Entries,
2223      RE_Communication_Block              =>
2224        System_Tasking_Protected_Objects_Operations,
2225      RE_Protected_Entry_Call             =>
2226        System_Tasking_Protected_Objects_Operations,
2227      RE_Service_Entries                  =>
2228        System_Tasking_Protected_Objects_Operations,
2229      RE_Cancel_Protected_Entry_Call      =>
2230        System_Tasking_Protected_Objects_Operations,
2231      RE_Enqueued                         =>
2232        System_Tasking_Protected_Objects_Operations,
2233      RE_Cancelled                        =>
2234        System_Tasking_Protected_Objects_Operations,
2235      RE_Complete_Entry_Body              =>
2236        System_Tasking_Protected_Objects_Operations,
2237      RE_Exceptional_Complete_Entry_Body  =>
2238        System_Tasking_Protected_Objects_Operations,
2239      RE_Requeue_Protected_Entry          =>
2240        System_Tasking_Protected_Objects_Operations,
2241      RE_Requeue_Task_To_Protected_Entry  =>
2242        System_Tasking_Protected_Objects_Operations,
2243      RE_Protected_Count                  =>
2244        System_Tasking_Protected_Objects_Operations,
2245      RE_Protected_Entry_Caller           =>
2246        System_Tasking_Protected_Objects_Operations,
2247      RE_Timed_Protected_Entry_Call       =>
2248        System_Tasking_Protected_Objects_Operations,
2249
2250      RE_Protection_Entry                 =>
2251        System_Tasking_Protected_Objects_Single_Entry,
2252      RE_Initialize_Protection_Entry      =>
2253        System_Tasking_Protected_Objects_Single_Entry,
2254      RE_Lock_Entry                       =>
2255        System_Tasking_Protected_Objects_Single_Entry,
2256      RE_Lock_Read_Only_Entry             =>
2257        System_Tasking_Protected_Objects_Single_Entry,
2258      RE_Unlock_Entry                     =>
2259        System_Tasking_Protected_Objects_Single_Entry,
2260      RE_Protected_Single_Entry_Call      =>
2261        System_Tasking_Protected_Objects_Single_Entry,
2262      RE_Service_Entry                    =>
2263        System_Tasking_Protected_Objects_Single_Entry,
2264      RE_Complete_Single_Entry_Body       =>
2265        System_Tasking_Protected_Objects_Single_Entry,
2266      RE_Exceptional_Complete_Single_Entry_Body =>
2267        System_Tasking_Protected_Objects_Single_Entry,
2268      RE_Protected_Count_Entry            =>
2269        System_Tasking_Protected_Objects_Single_Entry,
2270      RE_Protected_Single_Entry_Caller    =>
2271        System_Tasking_Protected_Objects_Single_Entry,
2272      RE_Timed_Protected_Single_Entry_Call =>
2273        System_Tasking_Protected_Objects_Single_Entry,
2274
2275      RE_Protected_Entry_Index            => System_Tasking_Protected_Objects,
2276      RE_Entry_Body                       => System_Tasking_Protected_Objects,
2277      RE_Protection                       => System_Tasking_Protected_Objects,
2278      RE_Initialize_Protection            => System_Tasking_Protected_Objects,
2279      RE_Finalize_Protection              => System_Tasking_Protected_Objects,
2280      RE_Lock                             => System_Tasking_Protected_Objects,
2281      RE_Lock_Read_Only                   => System_Tasking_Protected_Objects,
2282      RE_Unlock                           => System_Tasking_Protected_Objects,
2283
2284      RE_Delay_Block                      => System_Tasking_Async_Delays,
2285      RE_Timed_Out                        => System_Tasking_Async_Delays,
2286      RE_Cancel_Async_Delay               => System_Tasking_Async_Delays,
2287      RE_Enqueue_Duration                 => System_Tasking_Async_Delays,
2288
2289      RE_Enqueue_Calendar                 =>
2290        System_Tasking_Async_Delays_Enqueue_Calendar,
2291      RE_Enqueue_RT                       =>
2292        System_Tasking_Async_Delays_Enqueue_RT,
2293
2294      RE_Accept_Call                      => System_Tasking_Rendezvous,
2295      RE_Accept_Trivial                   => System_Tasking_Rendezvous,
2296      RE_Callable                         => System_Tasking_Rendezvous,
2297      RE_Call_Simple                      => System_Tasking_Rendezvous,
2298      RE_Cancel_Task_Entry_Call           => System_Tasking_Rendezvous,
2299      RE_Requeue_Task_Entry               => System_Tasking_Rendezvous,
2300      RE_Requeue_Protected_To_Task_Entry  => System_Tasking_Rendezvous,
2301      RE_Complete_Rendezvous              => System_Tasking_Rendezvous,
2302      RE_Task_Count                       => System_Tasking_Rendezvous,
2303      RE_Exceptional_Complete_Rendezvous  => System_Tasking_Rendezvous,
2304      RE_Selective_Wait                   => System_Tasking_Rendezvous,
2305      RE_Task_Entry_Call                  => System_Tasking_Rendezvous,
2306      RE_Task_Entry_Caller                => System_Tasking_Rendezvous,
2307      RE_Timed_Task_Entry_Call            => System_Tasking_Rendezvous,
2308      RE_Timed_Selective_Wait             => System_Tasking_Rendezvous,
2309
2310      RE_Activate_Restricted_Tasks        => System_Tasking_Restricted_Stages,
2311      RE_Complete_Restricted_Activation   => System_Tasking_Restricted_Stages,
2312      RE_Create_Restricted_Task           => System_Tasking_Restricted_Stages,
2313      RE_Complete_Restricted_Task         => System_Tasking_Restricted_Stages,
2314      RE_Restricted_Terminated            => System_Tasking_Restricted_Stages,
2315
2316      RE_Abort_Tasks                      => System_Tasking_Stages,
2317      RE_Activate_Tasks                   => System_Tasking_Stages,
2318      RE_Complete_Activation              => System_Tasking_Stages,
2319      RE_Create_Task                      => System_Tasking_Stages,
2320      RE_Complete_Task                    => System_Tasking_Stages,
2321      RE_Free_Task                        => System_Tasking_Stages,
2322      RE_Expunge_Unactivated_Tasks        => System_Tasking_Stages,
2323      RE_Terminated                       => System_Tasking_Stages);
2324
2325    --------------------------------
2326    -- Configurable Run-Time Mode --
2327    --------------------------------
2328
2329    --  Part of the job of Rtsfind is to enforce run-time restrictions in
2330    --  configurable run-time mode. This is done by monitoring implicit access
2331    --  to the run time library requested by calls to the RTE function. A call
2332    --  may be invalid in configurable run-time mode for either of the
2333    --  following two reasons:
2334
2335    --     1. File in which entity lives is not present in run-time library
2336    --     2. File is present, but entity is not defined in the file
2337
2338    --  In normal mode, either or these two situations is a fatal error
2339    --  that indicates that the run-time library is incorrectly configured,
2340    --  and a fatal error message is issued to signal this error.
2341
2342    --  In configurable run-time mode, either of these two situations indicates
2343    --  simply that the corresponding operation is not available in the current
2344    --  run-time that is use. This is not a configuration error, but rather a
2345    --  natural result of a limited run-time. This situation is signalled by
2346    --  raising the exception RE_Not_Available. The caller must respond to
2347    --  this exception by posting an appropriate error message.
2348
2349    ----------------------
2350    -- No_Run_Time_Mode --
2351    ----------------------
2352
2353    --  For backwards compatibility with previous versions of GNAT, the
2354    --  compiler recognizes the pragma No_Run_Time. This provides a special
2355    --  version of configurable run-time mode that operates with the standard
2356    --  run-time library, but allows only a subset of entities to be
2357    --  accessed. If any other entity is accessed, then it is treated
2358    --  as a configurable run-time violation, and the exception
2359    --  RE_Not_Availble is raised.
2360
2361    --  The following array defines the set of units that contain entities
2362    --  that can be referenced in No_Run_Time mode. For each of these units,
2363    --  all entities defined in the unit can be used in this mode.
2364
2365    OK_No_Run_Time_Unit : constant array (RTU_Id) of Boolean :=
2366      (Ada_Exceptions          => True,
2367       Ada_Tags                => True,
2368       Interfaces              => True,
2369       System                  => True,
2370       System_Parameters       => True,
2371       System_Fat_Flt          => True,
2372       System_Fat_LFlt         => True,
2373       System_Fat_LLF          => True,
2374       System_Fat_SFlt         => True,
2375       System_Machine_Code     => True,
2376       System_Secondary_Stack  => True,
2377       System_Storage_Elements => True,
2378       System_Task_Info        => True,
2379       System_Unsigned_Types   => True,
2380       others                  => False);
2381
2382    -----------------
2383    -- Subprograms --
2384    -----------------
2385
2386    procedure Initialize;
2387    --  Procedure to initialize data structures used by RTE. Called at the
2388    --  start of processing a new main source file. Must be called after
2389    --  Initialize_Snames (since names it enters into name table must come
2390    --  after names entered by Snames).
2391
2392    RE_Not_Available : exception;
2393    --  Raised by RTE if the requested entity is not available. This can
2394    --  occur either because the file in which the entity should be found
2395    --  does not exist, or because the entity is not present in the file.
2396
2397    function RTE (E : RE_Id) return Entity_Id;
2398    --  Given the entity defined in the above tables, as identified by the
2399    --  corresponding value in the RE_Id enumeration type, returns the Id
2400    --  of the corresponding entity, first loading in (parsing, analyzing and
2401    --  expanding) its spec if the unit has not already been loaded.
2402    --
2403    --  Note: In the case of a package, RTE can return either an entity that
2404    --  is declared at the top level of the package, or the package entity
2405    --  itself. If an entity within the package has the same simple name as
2406    --  the package, then the entity within the package is returned rather
2407    --
2408    --  If RTE returns, the returned value is the required entity
2409    --
2410    --  If the entity is not available, then an error message is given The
2411    --  form of the message depends on whether we are in configurable run time
2412    --  mode or not. In configurable run time mode, a missing entity is not
2413    --  that surprising and merely says that the particular construct is not
2414    --  supported by the run-time in use. If we are not in configurable run
2415    --  time mode, a missing entity is some kind of run-time configuration
2416    --  error. In either case, the result of the call is to raise the exception
2417    --  RE_Not_Available, which should terminate the expansion of the current
2418    --  construct.
2419
2420    function Is_RTE (Ent : Entity_Id; E : RE_Id) return Boolean;
2421    --  This function determines if the given entity corresponds to the entity
2422    --  referenced by RE_Id. It is similar in effect to (Ent = RTE (E)) except
2423    --  that the latter would unconditionally load the unit containing E. For
2424    --  this call, if the unit is not loaded, then a result of False is returned
2425    --  immediately, since obviously Ent cannot be the entity in question if the
2426    --  corresponding unit has not been loaded.
2427
2428    function Is_RTU (Ent : Entity_Id;  U : RTU_Id) return Boolean;
2429    pragma Inline (Is_RTU);
2430    --  This function determines if the given entity corresponds to the entity
2431    --  for the unit referenced by U. If this unit has not been loaded, the
2432    --  answer will always be False. If the unit has been loaded, then the
2433    --  entity id values are compared and True is returned if Ent is the
2434    --  entity for this unit.
2435
2436    function RTE_Available (E : RE_Id) return Boolean;
2437    --  Returns true if a call to RTE will succeed without raising an
2438    --  exception and without generating an error message, i.e. if the
2439    --  call will obtain the desired entity without any problems.
2440
2441    procedure Text_IO_Kludge (Nam : Node_Id);
2442    --  In Ada 83, and hence for compatibility in Ada 9X, package Text_IO has
2443    --  generic subpackages (e.g. Integer_IO). They really should be child
2444    --  packages, and in GNAT, they *are* child packages. To maintain the
2445    --  required compatibility, this routine is called for package renamings
2446    --  and generic instantiations, with the simple name of the referenced
2447    --  package. If Text_IO has been with'ed and if the simple name of Nam
2448    --  matches one of the subpackages of Text_IO, then this subpackage is
2449    --  with'ed automatically. The important result of this approach is that
2450    --  Text_IO does not drag in all the code for the subpackages unless they
2451    --  are used. Our test is a little crude, and could drag in stuff when it
2452    --  is not necessary, but that doesn't matter. Wide_Text_IO is handled in
2453    --  a similar manner.
2454
2455    function Is_Text_IO_Kludge_Unit (Nam : Node_Id) return Boolean;
2456    --  Returns True if the given Nam is an Expanded Name, whose Prefix is
2457    --  Ada, and whose selector is either Text_IO.xxx or Wide_Text_IO.xxx
2458    --  where xxx is one of the subpackages of Text_IO that is specially
2459    --  handled as described above for Text_IO_Kludge.
2460
2461 end Rtsfind;