]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/ada/rtsfind.ads
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / ada / rtsfind.ads
diff --git a/gcc/ada/rtsfind.ads b/gcc/ada/rtsfind.ads
deleted file mode 100644 (file)
index 7a4adb8..0000000
+++ /dev/null
@@ -1,2362 +0,0 @@
-------------------------------------------------------------------------------
---                                                                          --
---                         GNAT COMPILER COMPONENTS                         --
---                                                                          --
---                              R T S F I N D                               --
---                                                                          --
---                                 S p e c                                  --
---                                                                          --
---                            $Revision: 1.3.10.1 $
---                                                                          --
---          Copyright (C) 1992-2001, Free Software Foundation, Inc.         --
---                                                                          --
--- GNAT is free software;  you can  redistribute it  and/or modify it under --
--- terms of the  GNU General Public License as published  by the Free Soft- --
--- ware  Foundation;  either version 2,  or (at your option) any later ver- --
--- sion.  GNAT is distributed in the hope that it will be useful, but WITH- --
--- OUT ANY WARRANTY;  without even the  implied warranty of MERCHANTABILITY --
--- or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License --
--- for  more details.  You should have  received  a copy of the GNU General --
--- Public License  distributed with GNAT;  see file COPYING.  If not, write --
--- to  the Free Software Foundation,  59 Temple Place - Suite 330,  Boston, --
--- MA 02111-1307, USA.                                                      --
---                                                                          --
--- GNAT was originally developed  by the GNAT team at  New York University. --
--- Extensive contributions were provided by Ada Core Technologies Inc.      --
---                                                                          --
-------------------------------------------------------------------------------
-
-with Types; use Types;
-
-package Rtsfind is
-
---  This package contains the routine that is used to obtain runtime library
---  entities, loading in the required runtime library packages on demand. It
---  is also used for such purposes as finding System.Address when System has
---  not been explicitly With'ed.
-
-   ------------------------
-   -- Runtime Unit Table --
-   ------------------------
-
-   --  The following type includes an enumeration entry for each runtime
-   --  unit. The enumeration literal represents the fully qualified
-   --  name of the unit, as follows:
-
-   --    Names of the form Ada_xxx are first level children of Ada, whose
-   --    name is Ada.xxx. For example, the name Ada_Tags refers to package
-   --    Ada.Tags.
-
-   --    Names of the form Ada_Calendar_xxx are second level children
-   --    of Ada.Calendar. This is part of a temporary implementation of
-   --    delays; eventually, packages implementing delays will be found
-   --    relative to the package that declares the time type.
-
-   --    Names of the form Interfaces_xxx are first level children of
-   --    Interfaces_CPP refers to package Interfaces.CPP
-
-   --    Names of the form System_xxx are first level children of System, whose
-   --    name is System.xxx. For example, the name System_Str_Concat refers to
-   --    package System.Str_Concat.
-
-   --    Names of the form System_Tasking_xxx are second level children of the
-   --    package System.Tasking. For example, System_Tasking_Stages refers to
-   --    refers to the package System.Tasking.Stages.
-
-   --    Other names stand for themselves (e.g. System for package System)
-
-   --  This list can contain both subprogram and package unit names. For
-   --  packages, the accessible entities in the package are separately
-   --  listed in the package entity table. The units must be either library
-   --  level package declarations, or library level subprogram declarations.
-   --  Generic units, library level instantiations and subprogram bodies
-   --  acting as specs may not be referenced (all these cases could be added
-   --  at the expense of additional complexity in the body of Rtsfind, but
-   --  it doesn't seem worth while, since the implementation controls the
-   --  set of units that are referenced, and this restrictions is easily met.
-
-   --  IMPORTANT NOTE: the specs of packages and procedures with'ed using
-   --  this mechanism may not contain use clauses. This is because these
-   --  subprograms are compiled in the current visibility environment, and
-   --  it would be too much trouble to establish a clean environment for the
-   --  compilation. The presence of extraneous visible stuff has no effect
-   --  on the compilation except in the presence of use clauses (which might
-   --  result in unexpected ambiguities).
-
-   type RTU_Id is (
-      --  Runtime packages, for list of accessible entities in each
-      --  package see declarations in the runtime entity table below.
-
-      RTU_Null,
-      --  Used as a null entry. Will cause an error if referenced.
-
-      --  Children of Ada
-
-      Ada_Calendar,
-      Ada_Exceptions,
-      Ada_Finalization,
-      Ada_Interrupts,
-      Ada_Real_Time,
-      Ada_Streams,
-      Ada_Tags,
-      Ada_Task_Identification,
-
-      --  Children of Ada.Calendar
-
-      Ada_Calendar_Delays,
-
-      --  Children of Ada.Finalization
-
-      Ada_Finalization_List_Controller,
-
-      --  Children of Ada.Real_Time
-
-      Ada_Real_Time_Delays,
-
-      --  Children of Ada.Streams
-
-      Ada_Streams_Stream_IO,
-
-      --  Children of Ada.Text_IO (for Text_IO_Kludge)
-
-      Ada_Text_IO_Decimal_IO,
-      Ada_Text_IO_Enumeration_IO,
-      Ada_Text_IO_Fixed_IO,
-      Ada_Text_IO_Float_IO,
-      Ada_Text_IO_Integer_IO,
-      Ada_Text_IO_Modular_IO,
-
-      --  Children of Ada.Wide_Text_IO (for Text_IO_Kludge)
-
-      Ada_Wide_Text_IO_Decimal_IO,
-      Ada_Wide_Text_IO_Enumeration_IO,
-      Ada_Wide_Text_IO_Fixed_IO,
-      Ada_Wide_Text_IO_Float_IO,
-      Ada_Wide_Text_IO_Integer_IO,
-      Ada_Wide_Text_IO_Modular_IO,
-
-      --  Interfaces
-
-      Interfaces,
-
-      --  Children of Interfaces
-
-      Interfaces_CPP,
-      Interfaces_Packed_Decimal,
-
-      --  Package System
-
-      System,
-
-      --  Children of System
-
-      System_Arith_64,
-      System_AST_Handling,
-      System_Assertions,
-      System_Aux_DEC,
-      System_Bit_Ops,
-      System_Checked_Pools,
-      System_Exception_Table,
-      System_Exceptions,
-      System_Delay_Operations,
-      System_Exn_Flt,
-      System_Exn_Int,
-      System_Exn_LFlt,
-      System_Exn_LInt,
-      System_Exn_LLF,
-      System_Exn_LLI,
-      System_Exn_SFlt,
-      System_Exn_SInt,
-      System_Exn_SSI,
-      System_Exp_Flt,
-      System_Exp_Int,
-      System_Exp_LFlt,
-      System_Exp_LInt,
-      System_Exp_LLF,
-      System_Exp_LLI,
-      System_Exp_LLU,
-      System_Exp_Mod,
-      System_Exp_SFlt,
-      System_Exp_SInt,
-      System_Exp_SSI,
-      System_Exp_Uns,
-      System_Fat_Flt,
-      System_Fat_LFlt,
-      System_Fat_LLF,
-      System_Fat_SFlt,
-      System_Finalization_Implementation,
-      System_Finalization_Root,
-      System_Fore,
-      System_Img_Bool,
-      System_Img_Char,
-      System_Img_Dec,
-      System_Img_Enum,
-      System_Img_Int,
-      System_Img_LLD,
-      System_Img_LLI,
-      System_Img_LLU,
-      System_Img_Name,
-      System_Img_Real,
-      System_Img_Uns,
-      System_Img_WChar,
-      System_Interrupts,
-      System_Machine_Code,
-      System_Mantissa,
-      System_Pack_03,
-      System_Pack_05,
-      System_Pack_06,
-      System_Pack_07,
-      System_Pack_09,
-      System_Pack_10,
-      System_Pack_11,
-      System_Pack_12,
-      System_Pack_13,
-      System_Pack_14,
-      System_Pack_15,
-      System_Pack_17,
-      System_Pack_18,
-      System_Pack_19,
-      System_Pack_20,
-      System_Pack_21,
-      System_Pack_22,
-      System_Pack_23,
-      System_Pack_24,
-      System_Pack_25,
-      System_Pack_26,
-      System_Pack_27,
-      System_Pack_28,
-      System_Pack_29,
-      System_Pack_30,
-      System_Pack_31,
-      System_Pack_33,
-      System_Pack_34,
-      System_Pack_35,
-      System_Pack_36,
-      System_Pack_37,
-      System_Pack_38,
-      System_Pack_39,
-      System_Pack_40,
-      System_Pack_41,
-      System_Pack_42,
-      System_Pack_43,
-      System_Pack_44,
-      System_Pack_45,
-      System_Pack_46,
-      System_Pack_47,
-      System_Pack_48,
-      System_Pack_49,
-      System_Pack_50,
-      System_Pack_51,
-      System_Pack_52,
-      System_Pack_53,
-      System_Pack_54,
-      System_Pack_55,
-      System_Pack_56,
-      System_Pack_57,
-      System_Pack_58,
-      System_Pack_59,
-      System_Pack_60,
-      System_Pack_61,
-      System_Pack_62,
-      System_Pack_63,
-      System_Parameters,
-      System_Partition_Interface,
-      System_Pool_Global,
-      System_Pool_Empty,
-      System_Pool_Local,
-      System_Pool_Size,
-      System_RPC,
-      System_Scalar_Values,
-      System_Secondary_Stack,
-      System_Shared_Storage,
-      System_Soft_Links,
-      System_Standard_Library,
-      System_Storage_Elements,
-      System_Storage_Pools,
-      System_Stream_Attributes,
-      System_String_Ops,
-      System_String_Ops_Concat_3,
-      System_String_Ops_Concat_4,
-      System_String_Ops_Concat_5,
-      System_Task_Info,
-      System_Tasking,
-      System_Unsigned_Types,
-      System_Val_Bool,
-      System_Val_Char,
-      System_Val_Dec,
-      System_Val_Enum,
-      System_Val_Int,
-      System_Val_LLD,
-      System_Val_LLI,
-      System_Val_LLU,
-      System_Val_Name,
-      System_Val_Real,
-      System_Val_Uns,
-      System_Val_WChar,
-      System_Vax_Float_Operations,
-      System_Version_Control,
-      System_VMS_Exception_Table,
-      System_WCh_StW,
-      System_WCh_WtS,
-      System_Wid_Bool,
-      System_Wid_Char,
-      System_Wid_Enum,
-      System_Wid_LLI,
-      System_Wid_LLU,
-      System_Wid_Name,
-      System_Wid_WChar,
-      System_WWd_Char,
-      System_WWd_Enum,
-      System_WWd_Wchar,
-
-      --  Children of System.Tasking
-
-      System_Tasking_Async_Delays,
-      System_Tasking_Async_Delays_Enqueue_Calendar,
-      System_Tasking_Async_Delays_Enqueue_RT,
-      System_Tasking_Protected_Objects,
-      System_Tasking_Protected_Objects_Entries,
-      System_Tasking_Protected_Objects_Operations,
-      System_Tasking_Protected_Objects_Single_Entry,
-      System_Tasking_Restricted_Stages,
-      System_Tasking_Rendezvous,
-      System_Tasking_Stages);
-
-   subtype Ada_Child is RTU_Id
-     range Ada_Calendar .. Ada_Wide_Text_IO_Modular_IO;
-   --  Range of values for children or grand-children of Ada
-
-   subtype Ada_Calendar_Child is Ada_Child
-     range Ada_Calendar_Delays .. Ada_Calendar_Delays;
-   --  Range of values for children of Ada.Calendar
-
-   subtype Ada_Finalization_Child is Ada_Child range
-     Ada_Finalization_List_Controller .. Ada_Finalization_List_Controller;
-   --  Range of values for children of Ada.Finalization
-
-   subtype Ada_Real_Time_Child is Ada_Child
-     range Ada_Real_Time_Delays .. Ada_Real_Time_Delays;
-   --  Range of values for children of Ada.Real_Time
-
-   subtype Ada_Streams_Child is Ada_Child
-     range Ada_Streams_Stream_IO .. Ada_Streams_Stream_IO;
-
-   subtype Ada_Text_IO_Child is Ada_Child
-     range Ada_Text_IO_Decimal_IO .. Ada_Text_IO_Modular_IO;
-   --  Range of values for children of Ada.Text_IO
-
-   subtype Ada_Wide_Text_IO_Child is Ada_Child
-     range Ada_Wide_Text_IO_Decimal_IO .. Ada_Wide_Text_IO_Modular_IO;
-   --  Range of values for children of Ada.Text_IO
-
-   subtype Interfaces_Child is RTU_Id
-     range Interfaces_CPP .. Interfaces_Packed_Decimal;
-   --  Range of values for children of Interfaces
-
-   subtype System_Child is RTU_Id
-     range System_Arith_64 .. System_Tasking_Stages;
-   --  Range of values for children or grandchildren of System
-
-   subtype System_Tasking_Child is System_Child
-     range System_Tasking_Async_Delays .. System_Tasking_Stages;
-   --  Range of values for children of System.Tasking
-
-   subtype System_Tasking_Protected_Objects_Child is System_Tasking_Child
-     range System_Tasking_Protected_Objects_Entries ..
-       System_Tasking_Protected_Objects_Single_Entry;
-   --  Range of values for children of System.Tasking.Protected_Objects
-
-   subtype System_Tasking_Restricted_Child is System_Tasking_Child
-     range System_Tasking_Restricted_Stages ..
-       System_Tasking_Restricted_Stages;
-   --  Range of values for children of System.Tasking.Restricted
-
-   subtype System_Tasking_Async_Delays_Child is System_Tasking_Child
-     range System_Tasking_Async_Delays_Enqueue_Calendar ..
-       System_Tasking_Async_Delays_Enqueue_RT;
-   --  Range of values for children of System.Tasking.Async_Delays
-
-   OK_To_Use_In_No_Run_Time_Mode : array (RTU_Id) of Boolean :=
-     (Ada_Tags                => True,
-      Ada_Exceptions          => True,
-      Interfaces              => True,
-      System                  => True,
-      System_Fat_Flt          => True,
-      System_Fat_LFlt         => True,
-      System_Fat_LLF          => True,
-      System_Fat_SFlt         => True,
-      System_Machine_Code     => True,
-      System_Storage_Elements => True,
-      System_Unsigned_Types   => True,
-      System_Secondary_Stack  => True,
-      others                  => False);
-   --  This array defines the set of packages that can legitimately be
-   --  accessed by Rtsfind in No_Run_Time mode. Any attempt to load
-   --  any other package in this mode will result in a message noting
-   --  use of a feature not supported in high integrity mode.
-
-   OK_To_Use_In_Ravenscar_Mode : array (RTU_Id) of Boolean :=
-     (System_Interrupts                             => True,
-      System_Tasking                                => True,
-      System_Tasking_Protected_Objects              => True,
-      System_Tasking_Restricted_Stages              => True,
-      System_Tasking_Protected_Objects_Single_Entry => True,
-      System_Task_Info                              => True,
-      System_Parameters                             => True,
-      Ada_Real_Time                                 => True,
-      Ada_Real_Time_Delays                          => True,
-      others                                        => False);
-   --  This array defines the set of packages that can legitimately be
-   --  accessed by Rtsfind in Ravenscar mode, in addition to the
-   --  No_Run_Time units which are also allowed.
-
-   --------------------------
-   -- Runtime Entity Table --
-   --------------------------
-
-   --  This is the enumeration type used to define the argument passed to
-   --  the RTE function. The name must exactly match the name of the entity
-   --  involved, and in the case of a package entity, this name must uniquely
-   --  imply the package containing the entity.
-
-   --  As far as possible, we avoid duplicate names in runtime packages, so
-   --  that the name RE_nnn uniquely identifies the entity nnn. In some cases,
-   --  it is impossible to avoid such duplication because the names come from
-   --  RM defined packages. In such cases, the name is of the form RO_XX_nnn
-   --  where XX is two letters used to differentiate the multiple occurrences
-   --  of the name xx, and nnn is the entity name.
-
-   --  Note that not all entities in the units contained in the run-time unit
-   --  table are included in the following table, only those that actually
-   --  have to be referenced from generated code.
-
-   --  Note on RE_Null. This value is used as a null entry where an RE_Id
-   --  value is required syntactically, but no real entry is required or
-   --  needed. Use of this value will cause a fatal error in an RTE call.
-
-   type RE_Id is (
-
-     RE_Null,
-
-     RE_Code_Loc,                        -- Ada.Exceptions
-     RE_Current_Target_Exception,        -- Ada.Exceptions (JGNAT use only)
-     RE_Exception_Id,                    -- Ada.Exceptions
-     RE_Exception_Information,           -- Ada.Exceptions
-     RE_Exception_Message,               -- Ada.Exceptions
-     RE_Exception_Name_Simple,           -- Ada.Exceptions
-     RE_Exception_Occurrence,            -- Ada.Exceptions
-     RE_Null_Id,                         -- Ada.Exceptions
-     RE_Null_Occurrence,                 -- Ada.Exceptions
-     RE_Poll,                            -- Ada.Exceptions
-     RE_Raise_Exception,                 -- Ada.Exceptions
-     RE_Raise_Exception_Always,          -- Ada.Exceptions
-     RE_Reraise_Occurrence,              -- Ada.Exceptions
-     RE_Reraise_Occurrence_Always,       -- Ada.Exceptions
-     RE_Reraise_Occurrence_No_Defer,     -- Ada.Exceptions
-     RE_Save_Occurrence,                 -- Ada.Exceptions
-
-     RE_Simple_List_Controller,          -- Ada.Finalization.List_Controller
-     RE_List_Controller,                 -- Ada.Finalization.List_Controller
-
-     RE_Interrupt_Id,                    -- Ada.Interrupts
-
-     RE_Root_Stream_Type,                -- Ada.Streams
-     RE_Stream_Element,                  -- Ada.Streams
-     RE_Stream_Element_Offset,           -- Ada.Streams
-     RE_Stream_Element_Array,            -- Ada.Streams
-
-     RE_Stream_Access,                   -- Ada.Streams.Stream_IO
-
-     RE_CW_Membership,                   -- Ada.Tags
-     RE_DT_Entry_Size,                   -- Ada.Tags
-     RE_DT_Prologue_Size,                -- Ada.Tags
-     RE_External_Tag,                    -- Ada.Tags
-     RE_Get_Expanded_Name,               -- Ada.Tags
-     RE_Get_External_Tag,                -- Ada.Tags
-     RE_Get_Prim_Op_Address,             -- Ada.Tags
-     RE_Get_RC_Offset,                   -- Ada.Tags
-     RE_Get_Remotely_Callable,           -- Ada.Tags
-     RE_Get_TSD,                         -- Ada.Tags
-     RE_Inherit_DT,                      -- Ada.Tags
-     RE_Inherit_TSD,                     -- Ada.Tags
-     RE_Internal_Tag,                    -- Ada.Tags
-     RE_Register_Tag,                    -- Ada.Tags
-     RE_Set_Expanded_Name,               -- Ada.Tags
-     RE_Set_External_Tag,                -- Ada.Tags
-     RE_Set_Prim_Op_Address,             -- Ada.Tags
-     RE_Set_RC_Offset,                   -- Ada.Tags
-     RE_Set_Remotely_Callable,           -- Ada.Tags
-     RE_Set_TSD,                         -- Ada.Tags
-     RE_Tag_Error,                       -- Ada.Tags
-     RE_TSD_Entry_Size,                  -- Ada.Tags
-     RE_TSD_Prologue_Size,               -- Ada.Tags
-     RE_Tag,                             -- Ada.Tags
-     RE_Address_Array,                   -- Ada.Tags
-
-     RE_Current_Task,                    -- Ada.Task_Identification
-     RO_AT_Task_ID,                      -- Ada.Task_Identification
-
-     RO_CA_Time,                         -- Ada.Calendar
-
-     RO_CA_Delay_For,                    -- Ada.Calendar.Delays
-     RO_CA_Delay_Until,                  -- Ada.Calendar.Delays
-     RO_CA_To_Duration,                  -- Ada.Calendar.Delays
-
-     RO_RT_Time,                         -- Ada.Real_Time
-
-     RO_RT_Delay_Until,                  -- Ada.Real_Time.Delays
-     RO_RT_To_Duration,                  -- Ada.Real_Time.Delays
-
-     RE_Integer_64,                      -- Interfaces
-     RE_Unsigned_8,                      -- Interfaces
-     RE_Unsigned_16,                     -- Interfaces
-     RE_Unsigned_32,                     -- Interfaces
-     RE_Unsigned_64,                     -- Interfaces
-
-     RE_Vtable_Ptr,                      -- Interfaces.CPP
-     RE_Displaced_This,                  -- Interfaces.CPP
-     RE_CPP_CW_Membership,               -- Interfaces.CPP
-     RE_CPP_DT_Entry_Size,               -- Interfaces.CPP
-     RE_CPP_DT_Prologue_Size,            -- Interfaces.CPP
-     RE_CPP_Get_Expanded_Name,           -- Interfaces.CPP
-     RE_CPP_Get_External_Tag,            -- Interfaces.CPP
-     RE_CPP_Get_Prim_Op_Address,         -- Interfaces.CPP
-     RE_CPP_Get_RC_Offset,               -- Interfaces.CPP
-     RE_CPP_Get_Remotely_Callable,       -- Interfaces.CPP
-     RE_CPP_Get_TSD,                     -- Interfaces.CPP
-     RE_CPP_Inherit_DT,                  -- Interfaces.CPP
-     RE_CPP_Inherit_TSD,                 -- Interfaces.CPP
-     RE_CPP_Register_Tag,                -- Interfaces.CPP
-     RE_CPP_Set_Expanded_Name,           -- Interfaces.CPP
-     RE_CPP_Set_External_Tag,            -- Interfaces.CPP
-     RE_CPP_Set_Prim_Op_Address,         -- Interfaces.CPP
-     RE_CPP_Set_RC_Offset,               -- Interfaces.CPP
-     RE_CPP_Set_Remotely_Callable,       -- Interfaces.CPP
-     RE_CPP_Set_TSD,                     -- Interfaces.CPP
-     RE_CPP_TSD_Entry_Size,              -- Interfaces.CPP
-     RE_CPP_TSD_Prologue_Size,           -- Interfaces.CPP
-
-     RE_Packed_Size,                     -- Interfaces.Packed_Decimal
-     RE_Packed_To_Int32,                 -- Interfaces.Packed_Decimal
-     RE_Packed_To_Int64,                 -- Interfaces.Packed_Decimal
-     RE_Int32_To_Packed,                 -- Interfaces.Packed_Decimal
-     RE_Int64_To_Packed,                 -- Interfaces.Packed_Decimal
-
-     RE_Address,                         -- System
-     RE_Any_Priority,                    -- System
-     RE_Bit_Order,                       -- System
-     RE_Default_Priority,                -- System
-     RE_High_Order_First,                -- System
-     RE_Interrupt_Priority,              -- System
-     RE_Lib_Stop,                        -- System
-     RE_Low_Order_First,                 -- System
-     RE_Max_Interrupt_Priority,          -- System
-     RE_Max_Priority,                    -- System
-     RE_Null_Address,                    -- System
-     RE_Priority,                        -- System
-
-     RE_Add_With_Ovflo_Check,            -- System.Arith_64
-     RE_Double_Divide,                   -- System.Arith_64
-     RE_Multiply_With_Ovflo_Check,       -- System.Arith_64
-     RE_Scaled_Divide,                   -- System.Arith_64
-     RE_Subtract_With_Ovflo_Check,       -- System.Arith_64
-
-     RE_Create_AST_Handler,              -- System.AST_Handling
-
-     RE_Raise_Assert_Failure,            -- System.Assertions
-
-     RE_AST_Handler,                     -- System.Aux_DEC
-     RE_Import_Value,                    -- System.Aux_DEC
-     RE_No_AST_Handler,                  -- System.Aux_DEC
-     RE_Type_Class,                      -- System.Aux_DEC
-     RE_Type_Class_Enumeration,          -- System.Aux_DEC
-     RE_Type_Class_Integer,              -- System.Aux_DEC
-     RE_Type_Class_Fixed_Point,          -- System.Aux_DEC
-     RE_Type_Class_Floating_Point,       -- System.Aux_DEC
-     RE_Type_Class_Array,                -- System.Aux_DEC
-     RE_Type_Class_Record,               -- System.Aux_DEC
-     RE_Type_Class_Access,               -- System.Aux_DEC
-     RE_Type_Class_Task,                 -- System.Aux_DEC
-     RE_Type_Class_Address,              -- System.Aux_DEC
-
-     RE_Bit_And,                         -- System.Bit_Ops
-     RE_Bit_Eq,                          -- System.Bit_Ops
-     RE_Bit_Not,                         -- System.Bit_Ops
-     RE_Bit_Or,                          -- System.Bit_Ops
-     RE_Bit_Xor,                         -- System.Bit_Ops
-
-     RE_Checked_Pool,                    -- System.Checked_Pools
-
-     RE_Register_Exception,              -- System.Exception_Table
-
-     RE_All_Others_Id,                   -- System.Exceptions
-     RE_Handler_Record,                  -- System.Exceptions
-     RE_Handler_Record_Ptr,              -- System.Exceptions
-     RE_Others_Id,                       -- System.Exceptions
-     RE_Subprogram_Descriptor,           -- System.Exceptions
-     RE_Subprogram_Descriptor_0,         -- System.Exceptions
-     RE_Subprogram_Descriptor_1,         -- System.Exceptions
-     RE_Subprogram_Descriptor_2,         -- System.Exceptions
-     RE_Subprogram_Descriptor_3,         -- System.Exceptions
-     RE_Subprogram_Descriptor_List,      -- System.Exceptions
-     RE_Subprogram_Descriptor_Ptr,       -- System.Exceptions
-     RE_Subprogram_Descriptors_Record,   -- System.Exceptions
-     RE_Subprogram_Descriptors_Ptr,      -- System.Exceptions
-
-     RE_Exn_Float,                       -- System.Exn_Flt
-
-     RE_Exn_Integer,                     -- System.Exn_Int
-
-     RE_Exn_Long_Float,                  -- System.Exn_LFlt
-
-     RE_Exn_Long_Integer,                -- System.Exn_LInt
-
-     RE_Exn_Long_Long_Float,             -- System.Exn_LLF
-
-     RE_Exn_Long_Long_Integer,           -- System.Exn_LLI
-
-     RE_Exn_Short_Float,                 -- System.Exn_SFlt
-
-     RE_Exn_Short_Integer,               -- System.Exn_SInt
-
-     RE_Exn_Short_Short_Integer,         -- System.Exn_SSI
-
-     RE_Exp_Float,                       -- System.Exp_Flt
-
-     RE_Exp_Integer,                     -- System.Exp_Int
-
-     RE_Exp_Long_Float,                  -- System.Exp_LFlt
-
-     RE_Exp_Long_Integer,                -- System.Exp_LInt
-
-     RE_Exp_Long_Long_Float,             -- System.Exp_LLF
-
-     RE_Exp_Long_Long_Integer,           -- System.Exp_LLI
-
-     RE_Exp_Long_Long_Unsigned,          -- System.Exp_LLU
-
-     RE_Exp_Modular,                     -- System.Exp_Mod
-
-     RE_Exp_Short_Float,                 -- System.Exp_SFlt
-
-     RE_Exp_Short_Integer,               -- System.Exp_SInt
-
-     RE_Exp_Short_Short_Integer,         -- System.Exp_SSI
-
-     RE_Exp_Unsigned,                    -- System.Exp_Uns
-
-     RE_Fat_Float,                       -- System.Fat_Flt
-
-     RE_Fat_Long_Float,                  -- System.Fat_LFlt
-
-     RE_Fat_Long_Long_Float,             -- System.Fat_LLF
-
-     RE_Fat_Short_Float,                 -- System.Fat_SFlt
-
-     RE_Attach_To_Final_List,            -- System.Finalization_Implementation
-     RE_Finalize_List,                   -- System.Finalization_Implementation
-     RE_Finalize_One,                    -- System.Finalization_Implementation
-     RE_Global_Final_List,               -- System.Finalization_Implementation
-     RE_Record_Controller,               -- System.Finalization_Implementation
-     RE_Limited_Record_Controller,       -- System.Finalization_Implementation
-     RE_Deep_Tag_Initialize,             -- System.Finalization_Implementation
-     RE_Deep_Tag_Adjust,                 -- System.Finalization_Implementation
-     RE_Deep_Tag_Finalize,               -- System.Finalization_Implementation
-     RE_Deep_Tag_Attach,                 -- System.Finalization_Implementation
-     RE_Deep_Rec_Initialize,             -- System.Finalization_Implementation
-     RE_Deep_Rec_Adjust,                 -- System.Finalization_Implementation
-     RE_Deep_Rec_Finalize,               -- System.Finalization_Implementation
-
-     RE_Root_Controlled,                 -- System.Finalization_Root
-     RE_Finalizable,                     -- System.Finalization_Root
-     RE_Finalizable_Ptr,                 -- System.Finalization_Root
-
-     RE_Fore,                            -- System.Fore
-
-     RE_Image_Boolean,                   -- System.Img_Bool
-
-     RE_Image_Character,                 -- System.Img_Char
-
-     RE_Image_Decimal,                   -- System.Img_Dec
-
-     RE_Image_Enumeration_8,             -- System.Img_Enum
-     RE_Image_Enumeration_16,            -- System.Img_Enum
-     RE_Image_Enumeration_32,            -- System.Img_Enum
-
-     RE_Image_Integer,                   -- System.Img_Int
-
-     RE_Image_Long_Long_Decimal,         -- System.Img_LLD
-
-     RE_Image_Long_Long_Integer,         -- System.Img_LLI
-
-     RE_Image_Long_Long_Unsigned,        -- System.Img_LLU
-
-     RE_Image_Ordinary_Fixed_Point,      -- System.Img_Real
-     RE_Image_Floating_Point,            -- System.Img_Real
-
-     RE_Image_Unsigned,                  -- System.Img_Uns
-
-     RE_Image_Wide_Character,            -- System.Img_WChar
-
-     RE_Bind_Interrupt_To_Entry,         -- System.Interrupts
-     RE_Default_Interrupt_Priority,      -- System.Interrupts
-     RE_Dynamic_Interrupt_Protection,    -- System.Interrupts
-     RE_Install_Handlers,                -- System.Interrupts
-     RE_Register_Interrupt_Handler,      -- System.Interrupts
-     RE_Static_Interrupt_Protection,     -- System.Interrupts
-
-     RE_Asm_Insn,                        -- System.Machine_Code
-     RE_Asm_Input_Operand,               -- System.Machine_Code
-     RE_Asm_Output_Operand,              -- System.Machine_Code
-
-     RE_Mantissa_Value,                  -- System_Mantissa
-
-     RE_Bits_03,                         -- System.Pack_03
-     RE_Get_03,                          -- System.Pack_03
-     RE_Set_03,                          -- System.Pack_03
-
-     RE_Bits_05,                         -- System.Pack_05
-     RE_Get_05,                          -- System.Pack_05
-     RE_Set_05,                          -- System.Pack_05
-
-     RE_Bits_06,                         -- System.Pack_06
-     RE_Get_06,                          -- System.Pack_06
-     RE_GetU_06,                         -- System.Pack_06
-     RE_Set_06,                          -- System.Pack_06
-     RE_SetU_06,                         -- System.Pack_06
-
-     RE_Bits_07,                         -- System.Pack_07
-     RE_Get_07,                          -- System.Pack_07
-     RE_Set_07,                          -- System.Pack_07
-
-     RE_Bits_09,                         -- System.Pack_09
-     RE_Get_09,                          -- System.Pack_09
-     RE_Set_09,                          -- System.Pack_09
-
-     RE_Bits_10,                         -- System.Pack_10
-     RE_Get_10,                          -- System.Pack_10
-     RE_GetU_10,                         -- System.Pack_10
-     RE_Set_10,                          -- System.Pack_10
-     RE_SetU_10,                         -- System.Pack_10
-
-     RE_Bits_11,                         -- System.Pack_11
-     RE_Get_11,                          -- System.Pack_11
-     RE_Set_11,                          -- System.Pack_11
-
-     RE_Bits_12,                         -- System.Pack_12
-     RE_Get_12,                          -- System.Pack_12
-     RE_GetU_12,                         -- System.Pack_12
-     RE_Set_12,                          -- System.Pack_12
-     RE_SetU_12,                         -- System.Pack_12
-
-     RE_Bits_13,                         -- System.Pack_13
-     RE_Get_13,                          -- System.Pack_13
-     RE_Set_13,                          -- System.Pack_13
-
-     RE_Bits_14,                         -- System.Pack_14
-     RE_Get_14,                          -- System.Pack_14
-     RE_GetU_14,                         -- System.Pack_14
-     RE_Set_14,                          -- System.Pack_14
-     RE_SetU_14,                         -- System.Pack_14
-
-     RE_Bits_15,                         -- System.Pack_15
-     RE_Get_15,                          -- System.Pack_15
-     RE_Set_15,                          -- System.Pack_15
-
-     RE_Bits_17,                         -- System.Pack_17
-     RE_Get_17,                          -- System.Pack_17
-     RE_Set_17,                          -- System.Pack_17
-
-     RE_Bits_18,                         -- System.Pack_18
-     RE_Get_18,                          -- System.Pack_18
-     RE_GetU_18,                         -- System.Pack_18
-     RE_Set_18,                          -- System.Pack_18
-     RE_SetU_18,                         -- System.Pack_18
-
-     RE_Bits_19,                         -- System.Pack_19
-     RE_Get_19,                          -- System.Pack_19
-     RE_Set_19,                          -- System.Pack_19
-
-     RE_Bits_20,                         -- System.Pack_20
-     RE_Get_20,                          -- System.Pack_20
-     RE_GetU_20,                         -- System.Pack_20
-     RE_Set_20,                          -- System.Pack_20
-     RE_SetU_20,                         -- System.Pack_20
-
-     RE_Bits_21,                         -- System.Pack_21
-     RE_Get_21,                          -- System.Pack_21
-     RE_Set_21,                          -- System.Pack_21
-
-     RE_Bits_22,                         -- System.Pack_22
-     RE_Get_22,                          -- System.Pack_22
-     RE_GetU_22,                         -- System.Pack_22
-     RE_Set_22,                          -- System.Pack_22
-     RE_SetU_22,                         -- System.Pack_22
-
-     RE_Bits_23,                         -- System.Pack_23
-     RE_Get_23,                          -- System.Pack_23
-     RE_Set_23,                          -- System.Pack_23
-
-     RE_Bits_24,                         -- System.Pack_24
-     RE_Get_24,                          -- System.Pack_24
-     RE_GetU_24,                         -- System.Pack_24
-     RE_Set_24,                          -- System.Pack_24
-     RE_SetU_24,                         -- System.Pack_24
-
-     RE_Bits_25,                         -- System.Pack_25
-     RE_Get_25,                          -- System.Pack_25
-     RE_Set_25,                          -- System.Pack_25
-
-     RE_Bits_26,                         -- System.Pack_26
-     RE_Get_26,                          -- System.Pack_26
-     RE_GetU_26,                         -- System.Pack_26
-     RE_Set_26,                          -- System.Pack_26
-     RE_SetU_26,                         -- System.Pack_26
-
-     RE_Bits_27,                         -- System.Pack_27
-     RE_Get_27,                          -- System.Pack_27
-     RE_Set_27,                          -- System.Pack_27
-
-     RE_Bits_28,                         -- System.Pack_28
-     RE_Get_28,                          -- System.Pack_28
-     RE_GetU_28,                         -- System.Pack_28
-     RE_Set_28,                          -- System.Pack_28
-     RE_SetU_28,                         -- System.Pack_28
-
-     RE_Bits_29,                         -- System.Pack_29
-     RE_Get_29,                          -- System.Pack_29
-     RE_Set_29,                          -- System.Pack_29
-
-     RE_Bits_30,                         -- System.Pack_30
-     RE_Get_30,                          -- System.Pack_30
-     RE_GetU_30,                         -- System.Pack_30
-     RE_Set_30,                          -- System.Pack_30
-     RE_SetU_30,                         -- System.Pack_30
-
-     RE_Bits_31,                         -- System.Pack_31
-     RE_Get_31,                          -- System.Pack_31
-     RE_Set_31,                          -- System.Pack_31
-
-     RE_Bits_33,                         -- System.Pack_33
-     RE_Get_33,                          -- System.Pack_33
-     RE_Set_33,                          -- System.Pack_33
-
-     RE_Bits_34,                         -- System.Pack_34
-     RE_Get_34,                          -- System.Pack_34
-     RE_GetU_34,                         -- System.Pack_34
-     RE_Set_34,                          -- System.Pack_34
-     RE_SetU_34,                         -- System.Pack_34
-
-     RE_Bits_35,                         -- System.Pack_35
-     RE_Get_35,                          -- System.Pack_35
-     RE_Set_35,                          -- System.Pack_35
-
-     RE_Bits_36,                         -- System.Pack_36
-     RE_Get_36,                          -- System.Pack_36
-     RE_GetU_36,                         -- System.Pack_36
-     RE_Set_36,                          -- System.Pack_36
-     RE_SetU_36,                         -- System.Pack_36
-
-     RE_Bits_37,                         -- System.Pack_37
-     RE_Get_37,                          -- System.Pack_37
-     RE_Set_37,                          -- System.Pack_37
-
-     RE_Bits_38,                         -- System.Pack_38
-     RE_Get_38,                          -- System.Pack_38
-     RE_GetU_38,                         -- System.Pack_38
-     RE_Set_38,                          -- System.Pack_38
-     RE_SetU_38,                         -- System.Pack_38
-
-     RE_Bits_39,                         -- System.Pack_39
-     RE_Get_39,                          -- System.Pack_39
-     RE_Set_39,                          -- System.Pack_39
-
-     RE_Bits_40,                         -- System.Pack_40
-     RE_Get_40,                          -- System.Pack_40
-     RE_GetU_40,                         -- System.Pack_40
-     RE_Set_40,                          -- System.Pack_40
-     RE_SetU_40,                         -- System.Pack_40
-
-     RE_Bits_41,                         -- System.Pack_41
-     RE_Get_41,                          -- System.Pack_41
-     RE_Set_41,                          -- System.Pack_41
-
-     RE_Bits_42,                         -- System.Pack_42
-     RE_Get_42,                          -- System.Pack_42
-     RE_GetU_42,                         -- System.Pack_42
-     RE_Set_42,                          -- System.Pack_42
-     RE_SetU_42,                         -- System.Pack_42
-
-     RE_Bits_43,                         -- System.Pack_43
-     RE_Get_43,                          -- System.Pack_43
-     RE_Set_43,                          -- System.Pack_43
-
-     RE_Bits_44,                         -- System.Pack_44
-     RE_Get_44,                          -- System.Pack_44
-     RE_GetU_44,                         -- System.Pack_44
-     RE_Set_44,                          -- System.Pack_44
-     RE_SetU_44,                         -- System.Pack_44
-
-     RE_Bits_45,                         -- System.Pack_45
-     RE_Get_45,                          -- System.Pack_45
-     RE_Set_45,                          -- System.Pack_45
-
-     RE_Bits_46,                         -- System.Pack_46
-     RE_Get_46,                          -- System.Pack_46
-     RE_GetU_46,                         -- System.Pack_46
-     RE_Set_46,                          -- System.Pack_46
-     RE_SetU_46,                         -- System.Pack_46
-
-     RE_Bits_47,                         -- System.Pack_47
-     RE_Get_47,                          -- System.Pack_47
-     RE_Set_47,                          -- System.Pack_47
-
-     RE_Bits_48,                         -- System.Pack_48
-     RE_Get_48,                          -- System.Pack_48
-     RE_GetU_48,                         -- System.Pack_48
-     RE_Set_48,                          -- System.Pack_48
-     RE_SetU_48,                         -- System.Pack_48
-
-     RE_Bits_49,                         -- System.Pack_49
-     RE_Get_49,                          -- System.Pack_49
-     RE_Set_49,                          -- System.Pack_49
-
-     RE_Bits_50,                         -- System.Pack_50
-     RE_Get_50,                          -- System.Pack_50
-     RE_GetU_50,                         -- System.Pack_50
-     RE_Set_50,                          -- System.Pack_50
-     RE_SetU_50,                         -- System.Pack_50
-
-     RE_Bits_51,                         -- System.Pack_51
-     RE_Get_51,                          -- System.Pack_51
-     RE_Set_51,                          -- System.Pack_51
-
-     RE_Bits_52,                         -- System.Pack_52
-     RE_Get_52,                          -- System.Pack_52
-     RE_GetU_52,                         -- System.Pack_52
-     RE_Set_52,                          -- System.Pack_52
-     RE_SetU_52,                         -- System.Pack_52
-
-     RE_Bits_53,                         -- System.Pack_53
-     RE_Get_53,                          -- System.Pack_53
-     RE_Set_53,                          -- System.Pack_53
-
-     RE_Bits_54,                         -- System.Pack_54
-     RE_Get_54,                          -- System.Pack_54
-     RE_GetU_54,                         -- System.Pack_54
-     RE_Set_54,                          -- System.Pack_54
-     RE_SetU_54,                         -- System.Pack_54
-
-     RE_Bits_55,                         -- System.Pack_55
-     RE_Get_55,                          -- System.Pack_55
-     RE_Set_55,                          -- System.Pack_55
-
-     RE_Bits_56,                         -- System.Pack_56
-     RE_Get_56,                          -- System.Pack_56
-     RE_GetU_56,                         -- System.Pack_56
-     RE_Set_56,                          -- System.Pack_56
-     RE_SetU_56,                         -- System.Pack_56
-
-     RE_Bits_57,                         -- System.Pack_57
-     RE_Get_57,                          -- System.Pack_57
-     RE_Set_57,                          -- System.Pack_57
-
-     RE_Bits_58,                         -- System.Pack_58
-     RE_Get_58,                          -- System.Pack_58
-     RE_GetU_58,                         -- System.Pack_58
-     RE_Set_58,                          -- System.Pack_58
-     RE_SetU_58,                         -- System.Pack_58
-
-     RE_Bits_59,                         -- System.Pack_59
-     RE_Get_59,                          -- System.Pack_59
-     RE_Set_59,                          -- System.Pack_59
-
-     RE_Bits_60,                         -- System.Pack_60
-     RE_Get_60,                          -- System.Pack_60
-     RE_GetU_60,                         -- System.Pack_60
-     RE_Set_60,                          -- System.Pack_60
-     RE_SetU_60,                         -- System.Pack_60
-
-     RE_Bits_61,                         -- System.Pack_61
-     RE_Get_61,                          -- System.Pack_61
-     RE_Set_61,                          -- System.Pack_61
-
-     RE_Bits_62,                         -- System.Pack_62
-     RE_Get_62,                          -- System.Pack_62
-     RE_GetU_62,                         -- System.Pack_62
-     RE_Set_62,                          -- System.Pack_62
-     RE_SetU_62,                         -- System.Pack_62
-
-     RE_Bits_63,                         -- System.Pack_63
-     RE_Get_63,                          -- System.Pack_63
-     RE_Set_63,                          -- System.Pack_63
-
-     RE_Adjust_Storage_Size,             -- System_Parameters
-     RE_Default_Stack_Size,              -- System.Parameters
-     RE_Garbage_Collected,               -- System.Parameters
-     RE_Size_Type,                       -- System.Parameters
-     RE_Unspecified_Size,                -- System.Parameters
-
-     RE_Get_Active_Partition_Id,         -- System.Partition_Interface
-     RE_Get_Passive_Partition_Id,        -- System.Partition_Interface
-     RE_Get_Local_Partition_Id,          -- System.Partition_Interface
-     RE_Get_RCI_Package_Receiver,        -- System.Partition_Interface
-     RE_Get_Unique_Remote_Pointer,       -- System.Partition_Interface
-     RE_RACW_Stub_Type,                  -- System.Partition_Interface
-     RE_RACW_Stub_Type_Access,           -- System.Partition_Interface
-     RE_Raise_Program_Error_For_E_4_18,  -- System.Partition_Interface
-     RE_Raise_Program_Error_Unknown_Tag, -- System.Partition_Interface
-     RE_Register_Passive_Package,        -- System.Partition_Interface
-     RE_Register_Receiving_Stub,         -- System.Partition_Interface
-     RE_RCI_Info,                        -- System.Partition_Interface
-     RE_Subprogram_Id,                   -- System.Partition_Interface
-
-     RE_Global_Pool_Object,              -- System.Pool_Global
-
-     RE_Unbounded_Reclaim_Pool,          -- System.Pool_Local
-
-     RE_Stack_Bounded_Pool,              -- System.Pool_Size
-
-     RE_Do_Apc,                          -- System.RPC
-     RE_Do_Rpc,                          -- System.RPC
-     RE_Params_Stream_Type,              -- System.RPC
-     RE_Partition_ID,                    -- System.RPC
-     RE_RPC_Receiver,                    -- System.RPC
-
-     RE_IS_Is1,                          -- System.Scalar_Values
-     RE_IS_Is2,                          -- System.Scalar_Values
-     RE_IS_Is4,                          -- System.Scalar_Values
-     RE_IS_Is8,                          -- System.Scalar_Values
-     RE_IS_Iu1,                          -- System.Scalar_Values
-     RE_IS_Iu2,                          -- System.Scalar_Values
-     RE_IS_Iu4,                          -- System.Scalar_Values
-     RE_IS_Iu8,                          -- System.Scalar_Values
-     RE_IS_Isf,                          -- System.Scalar_Values
-     RE_IS_Ifl,                          -- System.Scalar_Values
-     RE_IS_Ilf,                          -- System.Scalar_Values
-     RE_IS_Ill,                          -- System.Scalar_Values
-
-     RE_Mark_Id,                         -- System.Secondary_Stack
-     RE_SS_Allocate,                     -- System.Secondary_Stack
-     RE_SS_Pool,                         -- System.Secondary_Stack
-     RE_SS_Mark,                         -- System.Secondary_Stack
-     RE_SS_Release,                      -- System.Secondary_Stack
-
-     RE_Shared_Var_Close,                -- System.Shared_Storage
-     RE_Shared_Var_Lock,                 -- System.Shared_Storage
-     RE_Shared_Var_ROpen,                -- System.Shared_Storage
-     RE_Shared_Var_Unlock,               -- System.Shared_Storage
-     RE_Shared_Var_WOpen,                -- System.Shared_Storage
-
-     RE_Abort_Undefer_Direct,            -- System.Standard_Library
-     RE_Exception_Data_Ptr,              -- System.Standard_Library
-
-     RE_Integer_Address,                 -- System.Storage_Elements
-     RE_Storage_Offset,                  -- System.Storage_Elements
-     RE_Storage_Array,                   -- System.Storage_Elements
-     RE_To_Address,                      -- System.Storage_Elements
-
-     RE_Root_Storage_Pool,               -- System.Storage_Pools
-
-     RE_Thin_Pointer,                    -- System.Stream_Attributes
-     RE_Fat_Pointer,                     -- System.Stream_Attributes
-
-     RE_I_AD,                            -- System.Stream_Attributes
-     RE_I_AS,                            -- System.Stream_Attributes
-     RE_I_B,                             -- System.Stream_Attributes
-     RE_I_C,                             -- System.Stream_Attributes
-     RE_I_F,                             -- System.Stream_Attributes
-     RE_I_I,                             -- System.Stream_Attributes
-     RE_I_LF,                            -- System.Stream_Attributes
-     RE_I_LI,                            -- System.Stream_Attributes
-     RE_I_LLF,                           -- System.Stream_Attributes
-     RE_I_LLI,                           -- System.Stream_Attributes
-     RE_I_LLU,                           -- System.Stream_Attributes
-     RE_I_LU,                            -- System.Stream_Attributes
-     RE_I_SF,                            -- System.Stream_Attributes
-     RE_I_SI,                            -- System.Stream_Attributes
-     RE_I_SSI,                           -- System.Stream_Attributes
-     RE_I_SSU,                           -- System.Stream_Attributes
-     RE_I_SU,                            -- System.Stream_Attributes
-     RE_I_U,                             -- System.Stream_Attributes
-     RE_I_WC,                            -- System.Stream_Attributes
-
-     RE_W_AD,                            -- System.Stream_Attributes
-     RE_W_AS,                            -- System.Stream_Attributes
-     RE_W_B,                             -- System.Stream_Attributes
-     RE_W_C,                             -- System.Stream_Attributes
-     RE_W_F,                             -- System.Stream_Attributes
-     RE_W_I,                             -- System.Stream_Attributes
-     RE_W_LF,                            -- System.Stream_Attributes
-     RE_W_LI,                            -- System.Stream_Attributes
-     RE_W_LLF,                           -- System.Stream_Attributes
-     RE_W_LLI,                           -- System.Stream_Attributes
-     RE_W_LLU,                           -- System.Stream_Attributes
-     RE_W_LU,                            -- System.Stream_Attributes
-     RE_W_SF,                            -- System.Stream_Attributes
-     RE_W_SI,                            -- System.Stream_Attributes
-     RE_W_SSI,                           -- System.Stream_Attributes
-     RE_W_SSU,                           -- System.Stream_Attributes
-     RE_W_SU,                            -- System.Stream_Attributes
-     RE_W_U,                             -- System.Stream_Attributes
-     RE_W_WC,                            -- System.Stream_Attributes
-
-     RE_Str_Concat,                      -- System.String_Ops
-     RE_Str_Concat_CC,                   -- System.String_Ops
-     RE_Str_Concat_CS,                   -- System.String_Ops
-     RE_Str_Concat_SC,                   -- System.String_Ops
-     RE_Str_Equal,                       -- System.String_Ops
-     RE_Str_Normalize,                   -- System.String_Ops
-     RE_Wide_Str_Normalize,              -- System.String_Ops
-
-     RE_Str_Concat_3,                    -- System.String_Ops_Concat_3
-
-     RE_Str_Concat_4,                    -- System.String_Ops_Concat_4
-
-     RE_Str_Concat_5,                    -- System.String_Ops_Concat_5
-
-     RE_Free_Task_Image,                 -- System.Task_Info
-     RE_Task_Info_Type,                  -- System.Task_Info
-     RE_Task_Image_Type,                 -- System_Task_Info
-     RE_Unspecified_Task_Info,           -- System.Task_Info
-
-     RE_Library_Task_Level,              -- System.Tasking
-
-     RE_Task_Procedure_Access,           -- System.Tasking
-
-     RO_ST_Task_ID,                      -- System.Tasking
-
-     RE_Call_Modes,                      -- System.Tasking
-     RE_Simple_Call,                     -- System.Tasking
-     RE_Conditional_Call,                -- System.Tasking
-     RE_Asynchronous_Call,               -- System.Tasking
-     RE_Timed_Call,                      -- System.Tasking
-
-     RE_Task_List,                       -- System.Tasking
-
-     RE_Accept_Alternative,              -- System.Tasking
-     RE_Accept_List,                     -- System.Tasking
-     RE_Accept_List_Access,              -- System.Tasking
-     RE_Max_Select,                      -- System.Tasking
-     RE_Max_Task_Entry,                  -- System.Tasking
-     RE_No_Rendezvous,                   -- System.Tasking
-     RE_Null_Task_Entry,                 -- System.Tasking
-     RE_Positive_Select_Index,           -- System.Tasking
-     RE_Select_Index,                    -- System.Tasking
-     RE_Select_Modes,                    -- System.Tasking
-     RE_Else_Mode,                       -- System.Tasking
-     RE_Simple_Mode,                     -- System.Tasking
-     RE_Terminate_Mode,                  -- System.Tasking
-     RE_Delay_Mode,                      -- System.Tasking
-     RE_Task_Entry_Index,                -- System.Tasking
-     RE_Self,                            -- System.Tasking
-
-     RE_Master_Id,                       -- System.Tasking
-     RE_Unspecified_Priority,            -- System.Tasking
-
-     RE_Activation_Chain,                -- System.Tasking
-
-     RE_Abort_Defer,                     -- System.Soft_Links
-     RE_Abort_Undefer,                   -- System.Soft_Links
-     RE_Complete_Master,                 -- System.Soft_Links
-     RE_Current_Master,                  -- System.Soft_Links
-     RE_Enter_Master,                    -- System.Soft_Links
-     RE_Get_Current_Excep,               -- System.Soft_Links
-     RE_Get_GNAT_Exception,              -- System.Soft_Links
-     RE_Update_Exception,                -- System.Soft_Links
-
-     RE_Bits_1,                          -- System.Unsigned_Types
-     RE_Bits_2,                          -- System.Unsigned_Types
-     RE_Bits_4,                          -- System.Unsigned_Types
-     RE_Float_Unsigned,                  -- System.Unsigned_Types
-     RE_Long_Long_Unsigned,              -- System.Unsigned_Types
-     RE_Packed_Byte,                     -- System.Unsigned_Types
-     RE_Packed_Bytes1,                   -- System.Unsigned_Types
-     RE_Packed_Bytes2,                   -- System.Unsigned_Types
-     RE_Packed_Bytes4,                   -- System.Unsigned_Types
-     RE_Unsigned,                        -- System.Unsigned_Types
-
-     RE_Value_Boolean,                   -- System.Val_Bool
-
-     RE_Value_Character,                 -- System.Val_Char
-
-     RE_Value_Decimal,                   -- System.Val_Dec
-
-     RE_Value_Enumeration_8,             -- System.Val_Enum
-     RE_Value_Enumeration_16,            -- System.Val_Enum
-     RE_Value_Enumeration_32,            -- System.Val_Enum
-
-     RE_Value_Integer,                   -- System.Val_Int
-
-     RE_Value_Long_Long_Decimal,         -- System.Val_LLD
-
-     RE_Value_Long_Long_Integer,         -- System.Val_LLI
-
-     RE_Value_Long_Long_Unsigned,        -- System.Val_LLU
-
-     RE_Value_Real,                      -- System.Val_Real
-
-     RE_Value_Unsigned,                  -- System.Val_Uns
-
-     RE_Value_Wide_Character,            -- System.Val_WChar
-
-     RE_D,                               -- System.Vax_Float_Operations
-     RE_F,                               -- System.Vax_Float_Operations
-     RE_G,                               -- System.Vax_Float_Operations
-     RE_Q,                               -- System.Vax_Float_Operations
-     RE_S,                               -- System.Vax_Float_Operations
-     RE_T,                               -- System.Vax_Float_Operations
-
-     RE_D_To_G,                          -- System.Vax_Float_Operations
-     RE_F_To_G,                          -- System.Vax_Float_Operations
-     RE_F_To_Q,                          -- System.Vax_Float_Operations
-     RE_F_To_S,                          -- System.Vax_Float_Operations
-     RE_G_To_D,                          -- System.Vax_Float_Operations
-     RE_G_To_F,                          -- System.Vax_Float_Operations
-     RE_G_To_Q,                          -- System.Vax_Float_Operations
-     RE_G_To_T,                          -- System.Vax_Float_Operations
-     RE_Q_To_F,                          -- System.Vax_Float_Operations
-     RE_Q_To_G,                          -- System.Vax_Float_Operations
-     RE_S_To_F,                          -- System.Vax_Float_Operations
-     RE_T_To_D,                          -- System.Vax_Float_Operations
-     RE_T_To_G,                          -- System.Vax_Float_Operations
-
-     RE_Abs_F,                           -- System.Vax_Float_Operations
-     RE_Abs_G,                           -- System.Vax_Float_Operations
-     RE_Add_F,                           -- System.Vax_Float_Operations
-     RE_Add_G,                           -- System.Vax_Float_Operations
-     RE_Div_F,                           -- System.Vax_Float_Operations
-     RE_Div_G,                           -- System.Vax_Float_Operations
-     RE_Mul_F,                           -- System.Vax_Float_Operations
-     RE_Mul_G,                           -- System.Vax_Float_Operations
-     RE_Neg_F,                           -- System.Vax_Float_Operations
-     RE_Neg_G,                           -- System.Vax_Float_Operations
-     RE_Sub_F,                           -- System.Vax_Float_Operations
-     RE_Sub_G,                           -- System.Vax_Float_Operations
-
-     RE_Eq_F,                            -- System.Vax_Float_Operations
-     RE_Eq_G,                            -- System.Vax_Float_Operations
-     RE_Le_F,                            -- System.Vax_Float_Operations
-     RE_Le_G,                            -- System.Vax_Float_Operations
-     RE_Lt_F,                            -- System.Vax_Float_Operations
-     RE_Lt_G,                            -- System.Vax_Float_Operations
-
-     RE_Version_String,                  -- System.Version_Control
-     RE_Get_Version_String,              -- System.Version_Control
-
-     RE_Register_VMS_Exception,          -- System.VMS_Exception_Table
-
-     RE_String_To_Wide_String,           -- System.WCh_StW
-
-     RE_Wide_String_To_String,           -- System.WCh_WtS
-
-     RE_Wide_Width_Character,            -- System.WWd_Char
-
-     RE_Wide_Width_Enumeration_8,        -- System.WWd_Enum
-     RE_Wide_Width_Enumeration_16,       -- System.WWd_Enum
-     RE_Wide_Width_Enumeration_32,       -- System.WWd_Enum
-
-     RE_Wide_Width_Wide_Character,       -- System.WWd_Wchar
-
-     RE_Width_Boolean,                   -- System.Wid_Bool
-
-     RE_Width_Character,                 -- System.Wid_Char
-
-     RE_Width_Enumeration_8,             -- System.Wid_Enum
-     RE_Width_Enumeration_16,            -- System.Wid_Enum
-     RE_Width_Enumeration_32,            -- System.Wid_Enum
-
-     RE_Width_Long_Long_Integer,         -- System.Wid_LLI
-
-     RE_Width_Long_Long_Unsigned,        -- System.Wid_LLU
-
-     RE_Width_Wide_Character,            -- System.Wid_WChar
-
-     RE_Protected_Entry_Body_Array,      -- Tasking.Protected_Objects.Entries
-     RE_Protection_Entries,              -- Tasking.Protected_Objects.Entries
-     RE_Initialize_Protection_Entries,   -- Tasking.Protected_Objects.Entries
-     RE_Lock_Entries,                    -- Tasking.Protected_Objects.Entries
-     RE_Lock_Read_Only_Entries,          -- Tasking.Protected_Objects.Entries
-     RE_Unlock_Entries,                  -- Tasking.Protected_Objects.Entries
-     RE_Communication_Block,             -- Protected_Objects.Operations
-     RE_Protected_Entry_Call,            -- Protected_Objects.Operations
-     RE_Service_Entries,                 -- Protected_Objects.Operations
-     RE_Cancel_Protected_Entry_Call,     -- Protected_Objects.Operations
-     RE_Enqueued,                        -- Protected_Objects.Operations
-     RE_Cancelled,                       -- Protected_Objects.Operations
-     RE_Complete_Entry_Body,             -- Protected_Objects.Operations
-     RE_Exceptional_Complete_Entry_Body, -- Protected_Objects.Operations
-     RE_Requeue_Protected_Entry,         -- Protected_Objects.Operations
-     RE_Requeue_Task_To_Protected_Entry, -- Protected_Objects.Operations
-     RE_Protected_Count,                 -- Protected_Objects.Operations
-     RE_Protected_Entry_Caller,          -- Protected_Objects.Operations
-     RE_Timed_Protected_Entry_Call,      -- Protected_Objects.Operations
-
-     RE_Protection_Entry,                -- Protected_Objects.Single_Entry
-     RE_Initialize_Protection_Entry,     -- Protected_Objects.Single_Entry
-     RE_Lock_Entry,                      -- Protected_Objects.Single_Entry
-     RE_Lock_Read_Only_Entry,            -- Protected_Objects.Single_Entry
-     RE_Unlock_Entry,                    -- Protected_Objects.Single_Entry
-     RE_Protected_Single_Entry_Call,     -- Protected_Objects.Single_Entry
-     RE_Service_Entry,                   -- Protected_Objects.Single_Entry
-     RE_Complete_Single_Entry_Body,      -- Protected_Objects.Single_Entry
-     RE_Exceptional_Complete_Single_Entry_Body,
-     RE_Protected_Count_Entry,           -- Protected_Objects.Single_Entry
-     RE_Protected_Single_Entry_Caller,   -- Protected_Objects.Single_Entry
-     RE_Timed_Protected_Single_Entry_Call,
-
-     RE_Protected_Entry_Index,           -- System.Tasking.Protected_Objects
-     RE_Entry_Body,                      -- System.Tasking.Protected_Objects
-     RE_Protection,                      -- System.Tasking.Protected_Objects
-     RE_Initialize_Protection,           -- System.Tasking.Protected_Objects
-     RE_Finalize_Protection,             -- System.Tasking.Protected_Objects
-     RE_Lock,                            -- System.Tasking.Protected_Objects
-     RE_Lock_Read_Only,                  -- System.Tasking.Protected_Objects
-     RE_Unlock,                          -- System.Tasking.Protected_Objects
-
-     RE_Delay_Block,                     -- System.Tasking.Async_Delays
-     RE_Timed_Out,                       -- System.Tasking.Async_Delays
-     RE_Cancel_Async_Delay,              -- System.Tasking.Async_Delays
-     RE_Enqueue_Duration,                -- System.Tasking.Async_Delays
-     RE_Enqueue_Calendar,                -- System.Tasking.Async_Delays
-     RE_Enqueue_RT,                      -- System.Tasking.Async_Delays
-
-     RE_Accept_Call,                     -- System.Tasking.Rendezvous
-     RE_Accept_Trivial,                  -- System.Tasking.Rendezvous
-     RE_Callable,                        -- System.Tasking.Rendezvous
-     RE_Call_Simple,                     -- System.Tasking.Rendezvous
-     RE_Requeue_Task_Entry,              -- System.Tasking.Rendezvous
-     RE_Requeue_Protected_To_Task_Entry, -- System.Tasking.Rendezvous
-     RE_Cancel_Task_Entry_Call,          -- System.Tasking.Rendezvous
-     RE_Complete_Rendezvous,             -- System.Tasking.Rendezvous
-     RE_Task_Count,                      -- System.Tasking.Rendezvous
-     RE_Exceptional_Complete_Rendezvous, -- System.Tasking.Rendezvous
-     RE_Selective_Wait,                  -- System.Tasking.Rendezvous
-     RE_Task_Entry_Call,                 -- System.Tasking.Rendezvous
-     RE_Task_Entry_Caller,               -- System.Tasking.Rendezvous
-     RE_Timed_Task_Entry_Call,           -- System.Tasking.Rendezvous
-     RE_Timed_Selective_Wait,            -- System.Tasking.Rendezvous
-
-     RE_Activate_Restricted_Tasks,       -- System.Tasking.Restricted.Stages
-     RE_Complete_Restricted_Activation,  -- System.Tasking.Restricted.Stages
-     RE_Create_Restricted_Task,          -- System.Tasking.Restricted.Stages
-     RE_Complete_Restricted_Task,        -- System.Tasking.Restricted.Stages
-     RE_Restricted_Terminated,           -- System.Tasking.Restricted.Stages
-
-     RE_Abort_Tasks,                     -- System.Tasking.Stages
-     RE_Activate_Tasks,                  -- System.Tasking.Stages
-     RE_Complete_Activation,             -- System.Tasking.Stages
-     RE_Create_Task,                     -- System.Tasking.Stages
-     RE_Complete_Task,                   -- System.Tasking.Stages
-     RE_Free_Task,                       -- System.Tasking.Stages
-     RE_Expunge_Unactivated_Tasks,       -- System.Tasking.Stages
-     RE_Terminated);                     -- System.Tasking.Stages
-
-   --  The following declarations build a table that is indexed by the
-   --  RTE function to determine the unit containing the given entity.
-   --  This table is sorted in order of package names.
-
-   RE_Unit_Table : array (RE_Id) of RTU_Id := (
-
-     RE_Null                             => RTU_Null,
-
-     RE_Code_Loc                         => Ada_Exceptions,
-     RE_Current_Target_Exception         => Ada_Exceptions, -- of JGNAT
-     RE_Exception_Id                     => Ada_Exceptions,
-     RE_Exception_Information            => Ada_Exceptions,
-     RE_Exception_Message                => Ada_Exceptions,
-     RE_Exception_Name_Simple            => Ada_Exceptions,
-     RE_Exception_Occurrence             => Ada_Exceptions,
-     RE_Null_Id                          => Ada_Exceptions,
-     RE_Null_Occurrence                  => Ada_Exceptions,
-     RE_Poll                             => Ada_Exceptions,
-     RE_Raise_Exception                  => Ada_Exceptions,
-     RE_Raise_Exception_Always           => Ada_Exceptions,
-     RE_Reraise_Occurrence               => Ada_Exceptions,
-     RE_Reraise_Occurrence_Always        => Ada_Exceptions,
-     RE_Reraise_Occurrence_No_Defer      => Ada_Exceptions,
-     RE_Save_Occurrence                  => Ada_Exceptions,
-
-     RE_Simple_List_Controller           => Ada_Finalization_List_Controller,
-     RE_List_Controller                  => Ada_Finalization_List_Controller,
-
-     RE_Interrupt_Id                     => Ada_Interrupts,
-
-     RE_Root_Stream_Type                 => Ada_Streams,
-     RE_Stream_Element                   => Ada_Streams,
-     RE_Stream_Element_Offset            => Ada_Streams,
-     RE_Stream_Element_Array             => Ada_Streams,
-
-     RE_Stream_Access                    => Ada_Streams_Stream_IO,
-
-     RE_CW_Membership                    => Ada_Tags,
-     RE_DT_Entry_Size                    => Ada_Tags,
-     RE_DT_Prologue_Size                 => Ada_Tags,
-     RE_External_Tag                     => Ada_Tags,
-     RE_Get_Expanded_Name                => Ada_Tags,
-     RE_Get_External_Tag                 => Ada_Tags,
-     RE_Get_Prim_Op_Address              => Ada_Tags,
-     RE_Get_RC_Offset                    => Ada_Tags,
-     RE_Get_Remotely_Callable            => Ada_Tags,
-     RE_Get_TSD                          => Ada_Tags,
-     RE_Inherit_DT                       => Ada_Tags,
-     RE_Inherit_TSD                      => Ada_Tags,
-     RE_Internal_Tag                     => Ada_Tags,
-     RE_Register_Tag                     => Ada_Tags,
-     RE_Set_Expanded_Name                => Ada_Tags,
-     RE_Set_External_Tag                 => Ada_Tags,
-     RE_Set_Prim_Op_Address              => Ada_Tags,
-     RE_Set_RC_Offset                    => Ada_Tags,
-     RE_Set_Remotely_Callable            => Ada_Tags,
-     RE_Set_TSD                          => Ada_Tags,
-     RE_Tag_Error                        => Ada_Tags,
-     RE_TSD_Entry_Size                   => Ada_Tags,
-     RE_TSD_Prologue_Size                => Ada_Tags,
-     RE_Tag                              => Ada_Tags,
-     RE_Address_Array                    => Ada_Tags,
-
-     RE_Current_Task                     => Ada_Task_Identification,
-     RO_AT_Task_ID                       => Ada_Task_Identification,
-
-     RO_CA_Time                          => Ada_Calendar,
-     RO_CA_Delay_For                     => Ada_Calendar_Delays,
-     RO_CA_Delay_Until                   => Ada_Calendar_Delays,
-     RO_CA_To_Duration                   => Ada_Calendar_Delays,
-
-     RO_RT_Time                          => Ada_Real_Time,
-     RO_RT_Delay_Until                   => Ada_Real_Time_Delays,
-     RO_RT_To_Duration                   => Ada_Real_Time_Delays,
-
-     RE_Integer_64                       => Interfaces,
-     RE_Unsigned_8                       => Interfaces,
-     RE_Unsigned_16                      => Interfaces,
-     RE_Unsigned_32                      => Interfaces,
-     RE_Unsigned_64                      => Interfaces,
-
-     RE_Vtable_Ptr                       => Interfaces_CPP,
-     RE_Displaced_This                   => Interfaces_CPP,
-     RE_CPP_CW_Membership                => Interfaces_CPP,
-     RE_CPP_DT_Entry_Size                => Interfaces_CPP,
-     RE_CPP_DT_Prologue_Size             => Interfaces_CPP,
-     RE_CPP_Get_Expanded_Name            => Interfaces_CPP,
-     RE_CPP_Get_External_Tag             => Interfaces_CPP,
-     RE_CPP_Get_Prim_Op_Address          => Interfaces_CPP,
-     RE_CPP_Get_RC_Offset                => Interfaces_CPP,
-     RE_CPP_Get_Remotely_Callable        => Interfaces_CPP,
-     RE_CPP_Get_TSD                      => Interfaces_CPP,
-     RE_CPP_Inherit_DT                   => Interfaces_CPP,
-     RE_CPP_Inherit_TSD                  => Interfaces_CPP,
-     RE_CPP_Register_Tag                 => Interfaces_CPP,
-     RE_CPP_Set_Expanded_Name            => Interfaces_CPP,
-     RE_CPP_Set_External_Tag             => Interfaces_CPP,
-     RE_CPP_Set_Prim_Op_Address          => Interfaces_CPP,
-     RE_CPP_Set_RC_Offset                => Interfaces_CPP,
-     RE_CPP_Set_Remotely_Callable        => Interfaces_CPP,
-     RE_CPP_Set_TSD                      => Interfaces_CPP,
-     RE_CPP_TSD_Entry_Size               => Interfaces_CPP,
-     RE_CPP_TSD_Prologue_Size            => Interfaces_CPP,
-
-     RE_Packed_Size                      => Interfaces_Packed_Decimal,
-     RE_Packed_To_Int32                  => Interfaces_Packed_Decimal,
-     RE_Packed_To_Int64                  => Interfaces_Packed_Decimal,
-     RE_Int32_To_Packed                  => Interfaces_Packed_Decimal,
-     RE_Int64_To_Packed                  => Interfaces_Packed_Decimal,
-
-     RE_Address                          => System,
-     RE_Any_Priority                     => System,
-     RE_Bit_Order                        => System,
-     RE_Default_Priority                 => System,
-     RE_High_Order_First                 => System,
-     RE_Interrupt_Priority               => System,
-     RE_Lib_Stop                         => System,
-     RE_Low_Order_First                  => System,
-     RE_Max_Interrupt_Priority           => System,
-     RE_Max_Priority                     => System,
-     RE_Null_Address                     => System,
-     RE_Priority                         => System,
-
-     RE_Add_With_Ovflo_Check             => System_Arith_64,
-     RE_Double_Divide                    => System_Arith_64,
-     RE_Multiply_With_Ovflo_Check        => System_Arith_64,
-     RE_Scaled_Divide                    => System_Arith_64,
-     RE_Subtract_With_Ovflo_Check        => System_Arith_64,
-
-     RE_Create_AST_Handler               => System_AST_Handling,
-
-     RE_Raise_Assert_Failure             => System_Assertions,
-
-     RE_AST_Handler                      => System_Aux_DEC,
-     RE_Import_Value                     => System_Aux_DEC,
-     RE_No_AST_Handler                   => System_Aux_DEC,
-     RE_Type_Class                       => System_Aux_DEC,
-     RE_Type_Class_Enumeration           => System_Aux_DEC,
-     RE_Type_Class_Integer               => System_Aux_DEC,
-     RE_Type_Class_Fixed_Point           => System_Aux_DEC,
-     RE_Type_Class_Floating_Point        => System_Aux_DEC,
-     RE_Type_Class_Array                 => System_Aux_DEC,
-     RE_Type_Class_Record                => System_Aux_DEC,
-     RE_Type_Class_Access                => System_Aux_DEC,
-     RE_Type_Class_Task                  => System_Aux_DEC,
-     RE_Type_Class_Address               => System_Aux_DEC,
-
-     RE_Bit_And                          => System_Bit_Ops,
-     RE_Bit_Eq                           => System_Bit_Ops,
-     RE_Bit_Not                          => System_Bit_Ops,
-     RE_Bit_Or                           => System_Bit_Ops,
-     RE_Bit_Xor                          => System_Bit_Ops,
-
-     RE_Checked_Pool                     => System_Checked_Pools,
-
-     RE_Register_Exception               => System_Exception_Table,
-
-     RE_All_Others_Id                    => System_Exceptions,
-     RE_Handler_Record                   => System_Exceptions,
-     RE_Handler_Record_Ptr               => System_Exceptions,
-     RE_Others_Id                        => System_Exceptions,
-     RE_Subprogram_Descriptor            => System_Exceptions,
-     RE_Subprogram_Descriptor_0          => System_Exceptions,
-     RE_Subprogram_Descriptor_1          => System_Exceptions,
-     RE_Subprogram_Descriptor_2          => System_Exceptions,
-     RE_Subprogram_Descriptor_3          => System_Exceptions,
-     RE_Subprogram_Descriptor_List       => System_Exceptions,
-     RE_Subprogram_Descriptor_Ptr        => System_Exceptions,
-     RE_Subprogram_Descriptors_Record    => System_Exceptions,
-     RE_Subprogram_Descriptors_Ptr       => System_Exceptions,
-
-     RE_Exn_Float                        => System_Exn_Flt,
-
-     RE_Exn_Integer                      => System_Exn_Int,
-
-     RE_Exn_Long_Float                   => System_Exn_LFlt,
-
-     RE_Exn_Long_Integer                 => System_Exn_LInt,
-
-     RE_Exn_Long_Long_Float              => System_Exn_LLF,
-
-     RE_Exn_Long_Long_Integer            => System_Exn_LLI,
-
-     RE_Exn_Short_Float                  => System_Exn_SFlt,
-
-     RE_Exn_Short_Integer                => System_Exn_SInt,
-
-     RE_Exn_Short_Short_Integer          => System_Exn_SSI,
-
-     RE_Exp_Float                        => System_Exp_Flt,
-
-     RE_Exp_Integer                      => System_Exp_Int,
-
-     RE_Exp_Long_Float                   => System_Exp_LFlt,
-
-     RE_Exp_Long_Integer                 => System_Exp_LInt,
-
-     RE_Exp_Long_Long_Float              => System_Exp_LLF,
-
-     RE_Exp_Long_Long_Integer            => System_Exp_LLI,
-
-     RE_Exp_Long_Long_Unsigned           => System_Exp_LLU,
-
-     RE_Exp_Modular                      => System_Exp_Mod,
-
-     RE_Exp_Short_Float                  => System_Exp_SFlt,
-
-     RE_Exp_Short_Integer                => System_Exp_SInt,
-
-     RE_Exp_Short_Short_Integer          => System_Exp_SSI,
-
-     RE_Exp_Unsigned                     => System_Exp_Uns,
-
-     RE_Fat_Float                        => System_Fat_Flt,
-
-     RE_Fat_Long_Float                   => System_Fat_LFlt,
-
-     RE_Fat_Long_Long_Float              => System_Fat_LLF,
-
-     RE_Fat_Short_Float                  => System_Fat_SFlt,
-
-     RE_Attach_To_Final_List             => System_Finalization_Implementation,
-     RE_Finalize_List                    => System_Finalization_Implementation,
-     RE_Finalize_One                     => System_Finalization_Implementation,
-     RE_Global_Final_List                => System_Finalization_Implementation,
-     RE_Record_Controller                => System_Finalization_Implementation,
-     RE_Limited_Record_Controller        => System_Finalization_Implementation,
-     RE_Deep_Tag_Initialize              => System_Finalization_Implementation,
-     RE_Deep_Tag_Adjust                  => System_Finalization_Implementation,
-     RE_Deep_Tag_Finalize                => System_Finalization_Implementation,
-     RE_Deep_Tag_Attach                  => System_Finalization_Implementation,
-     RE_Deep_Rec_Initialize              => System_Finalization_Implementation,
-     RE_Deep_Rec_Adjust                  => System_Finalization_Implementation,
-     RE_Deep_Rec_Finalize                => System_Finalization_Implementation,
-
-     RE_Root_Controlled                  => System_Finalization_Root,
-     RE_Finalizable                      => System_Finalization_Root,
-     RE_Finalizable_Ptr                  => System_Finalization_Root,
-
-     RE_Fore                             => System_Fore,
-
-     RE_Image_Boolean                    => System_Img_Bool,
-
-     RE_Image_Character                  => System_Img_Char,
-
-     RE_Image_Decimal                    => System_Img_Dec,
-
-     RE_Image_Enumeration_8              => System_Img_Enum,
-     RE_Image_Enumeration_16             => System_Img_Enum,
-     RE_Image_Enumeration_32             => System_Img_Enum,
-
-     RE_Image_Integer                    => System_Img_Int,
-
-     RE_Image_Long_Long_Decimal          => System_Img_LLD,
-
-     RE_Image_Long_Long_Integer          => System_Img_LLI,
-
-     RE_Image_Long_Long_Unsigned         => System_Img_LLU,
-
-     RE_Image_Ordinary_Fixed_Point       => System_Img_Real,
-     RE_Image_Floating_Point             => System_Img_Real,
-
-     RE_Image_Unsigned                   => System_Img_Uns,
-
-     RE_Image_Wide_Character             => System_Img_WChar,
-
-     RE_Bind_Interrupt_To_Entry          => System_Interrupts,
-     RE_Default_Interrupt_Priority       => System_Interrupts,
-     RE_Dynamic_Interrupt_Protection     => System_Interrupts,
-     RE_Install_Handlers                 => System_Interrupts,
-     RE_Register_Interrupt_Handler       => System_Interrupts,
-     RE_Static_Interrupt_Protection      => System_Interrupts,
-
-     RE_Asm_Insn                         => System_Machine_Code,
-     RE_Asm_Input_Operand                => System_Machine_Code,
-     RE_Asm_Output_Operand               => System_Machine_Code,
-
-     RE_Mantissa_Value                   => System_Mantissa,
-
-     RE_Bits_03                          => System_Pack_03,
-     RE_Get_03                           => System_Pack_03,
-     RE_Set_03                           => System_Pack_03,
-
-     RE_Bits_05                          => System_Pack_05,
-     RE_Get_05                           => System_Pack_05,
-     RE_Set_05                           => System_Pack_05,
-
-     RE_Bits_06                          => System_Pack_06,
-     RE_Get_06                           => System_Pack_06,
-     RE_GetU_06                          => System_Pack_06,
-     RE_Set_06                           => System_Pack_06,
-     RE_SetU_06                          => System_Pack_06,
-
-     RE_Bits_07                          => System_Pack_07,
-     RE_Get_07                           => System_Pack_07,
-     RE_Set_07                           => System_Pack_07,
-
-     RE_Bits_09                          => System_Pack_09,
-     RE_Get_09                           => System_Pack_09,
-     RE_Set_09                           => System_Pack_09,
-
-     RE_Bits_10                          => System_Pack_10,
-     RE_Get_10                           => System_Pack_10,
-     RE_GetU_10                          => System_Pack_10,
-     RE_Set_10                           => System_Pack_10,
-     RE_SetU_10                          => System_Pack_10,
-
-     RE_Bits_11                          => System_Pack_11,
-     RE_Get_11                           => System_Pack_11,
-     RE_Set_11                           => System_Pack_11,
-
-     RE_Bits_12                          => System_Pack_12,
-     RE_Get_12                           => System_Pack_12,
-     RE_GetU_12                          => System_Pack_12,
-     RE_Set_12                           => System_Pack_12,
-     RE_SetU_12                          => System_Pack_12,
-
-     RE_Bits_13                          => System_Pack_13,
-     RE_Get_13                           => System_Pack_13,
-     RE_Set_13                           => System_Pack_13,
-
-     RE_Bits_14                          => System_Pack_14,
-     RE_Get_14                           => System_Pack_14,
-     RE_GetU_14                          => System_Pack_14,
-     RE_Set_14                           => System_Pack_14,
-     RE_SetU_14                          => System_Pack_14,
-
-     RE_Bits_15                          => System_Pack_15,
-     RE_Get_15                           => System_Pack_15,
-     RE_Set_15                           => System_Pack_15,
-
-     RE_Bits_17                          => System_Pack_17,
-     RE_Get_17                           => System_Pack_17,
-     RE_Set_17                           => System_Pack_17,
-
-     RE_Bits_18                          => System_Pack_18,
-     RE_Get_18                           => System_Pack_18,
-     RE_GetU_18                          => System_Pack_18,
-     RE_Set_18                           => System_Pack_18,
-     RE_SetU_18                          => System_Pack_18,
-
-     RE_Bits_19                          => System_Pack_19,
-     RE_Get_19                           => System_Pack_19,
-     RE_Set_19                           => System_Pack_19,
-
-     RE_Bits_20                          => System_Pack_20,
-     RE_Get_20                           => System_Pack_20,
-     RE_GetU_20                          => System_Pack_20,
-     RE_Set_20                           => System_Pack_20,
-     RE_SetU_20                          => System_Pack_20,
-
-     RE_Bits_21                          => System_Pack_21,
-     RE_Get_21                           => System_Pack_21,
-     RE_Set_21                           => System_Pack_21,
-
-     RE_Bits_22                          => System_Pack_22,
-     RE_Get_22                           => System_Pack_22,
-     RE_GetU_22                          => System_Pack_22,
-     RE_Set_22                           => System_Pack_22,
-     RE_SetU_22                          => System_Pack_22,
-
-     RE_Bits_23                          => System_Pack_23,
-     RE_Get_23                           => System_Pack_23,
-     RE_Set_23                           => System_Pack_23,
-
-     RE_Bits_24                          => System_Pack_24,
-     RE_Get_24                           => System_Pack_24,
-     RE_GetU_24                          => System_Pack_24,
-     RE_Set_24                           => System_Pack_24,
-     RE_SetU_24                          => System_Pack_24,
-
-     RE_Bits_25                          => System_Pack_25,
-     RE_Get_25                           => System_Pack_25,
-     RE_Set_25                           => System_Pack_25,
-
-     RE_Bits_26                          => System_Pack_26,
-     RE_Get_26                           => System_Pack_26,
-     RE_GetU_26                          => System_Pack_26,
-     RE_Set_26                           => System_Pack_26,
-     RE_SetU_26                          => System_Pack_26,
-
-     RE_Bits_27                          => System_Pack_27,
-     RE_Get_27                           => System_Pack_27,
-     RE_Set_27                           => System_Pack_27,
-
-     RE_Bits_28                          => System_Pack_28,
-     RE_Get_28                           => System_Pack_28,
-     RE_GetU_28                          => System_Pack_28,
-     RE_Set_28                           => System_Pack_28,
-     RE_SetU_28                          => System_Pack_28,
-
-     RE_Bits_29                          => System_Pack_29,
-     RE_Get_29                           => System_Pack_29,
-     RE_Set_29                           => System_Pack_29,
-
-     RE_Bits_30                          => System_Pack_30,
-     RE_Get_30                           => System_Pack_30,
-     RE_GetU_30                          => System_Pack_30,
-     RE_Set_30                           => System_Pack_30,
-     RE_SetU_30                          => System_Pack_30,
-
-     RE_Bits_31                          => System_Pack_31,
-     RE_Get_31                           => System_Pack_31,
-     RE_Set_31                           => System_Pack_31,
-
-     RE_Bits_33                          => System_Pack_33,
-     RE_Get_33                           => System_Pack_33,
-     RE_Set_33                           => System_Pack_33,
-
-     RE_Bits_34                          => System_Pack_34,
-     RE_Get_34                           => System_Pack_34,
-     RE_GetU_34                          => System_Pack_34,
-     RE_Set_34                           => System_Pack_34,
-     RE_SetU_34                          => System_Pack_34,
-
-     RE_Bits_35                          => System_Pack_35,
-     RE_Get_35                           => System_Pack_35,
-     RE_Set_35                           => System_Pack_35,
-
-     RE_Bits_36                          => System_Pack_36,
-     RE_Get_36                           => System_Pack_36,
-     RE_GetU_36                          => System_Pack_36,
-     RE_Set_36                           => System_Pack_36,
-     RE_SetU_36                          => System_Pack_36,
-
-     RE_Bits_37                          => System_Pack_37,
-     RE_Get_37                           => System_Pack_37,
-     RE_Set_37                           => System_Pack_37,
-
-     RE_Bits_38                          => System_Pack_38,
-     RE_Get_38                           => System_Pack_38,
-     RE_GetU_38                          => System_Pack_38,
-     RE_Set_38                           => System_Pack_38,
-     RE_SetU_38                          => System_Pack_38,
-
-     RE_Bits_39                          => System_Pack_39,
-     RE_Get_39                           => System_Pack_39,
-     RE_Set_39                           => System_Pack_39,
-
-     RE_Bits_40                          => System_Pack_40,
-     RE_Get_40                           => System_Pack_40,
-     RE_GetU_40                          => System_Pack_40,
-     RE_Set_40                           => System_Pack_40,
-     RE_SetU_40                          => System_Pack_40,
-
-     RE_Bits_41                          => System_Pack_41,
-     RE_Get_41                           => System_Pack_41,
-     RE_Set_41                           => System_Pack_41,
-
-     RE_Bits_42                          => System_Pack_42,
-     RE_Get_42                           => System_Pack_42,
-     RE_GetU_42                          => System_Pack_42,
-     RE_Set_42                           => System_Pack_42,
-     RE_SetU_42                          => System_Pack_42,
-
-     RE_Bits_43                          => System_Pack_43,
-     RE_Get_43                           => System_Pack_43,
-     RE_Set_43                           => System_Pack_43,
-
-     RE_Bits_44                          => System_Pack_44,
-     RE_Get_44                           => System_Pack_44,
-     RE_GetU_44                          => System_Pack_44,
-     RE_Set_44                           => System_Pack_44,
-     RE_SetU_44                          => System_Pack_44,
-
-     RE_Bits_45                          => System_Pack_45,
-     RE_Get_45                           => System_Pack_45,
-     RE_Set_45                           => System_Pack_45,
-
-     RE_Bits_46                          => System_Pack_46,
-     RE_Get_46                           => System_Pack_46,
-     RE_GetU_46                          => System_Pack_46,
-     RE_Set_46                           => System_Pack_46,
-     RE_SetU_46                          => System_Pack_46,
-
-     RE_Bits_47                          => System_Pack_47,
-     RE_Get_47                           => System_Pack_47,
-     RE_Set_47                           => System_Pack_47,
-
-     RE_Bits_48                          => System_Pack_48,
-     RE_Get_48                           => System_Pack_48,
-     RE_GetU_48                          => System_Pack_48,
-     RE_Set_48                           => System_Pack_48,
-     RE_SetU_48                          => System_Pack_48,
-
-     RE_Bits_49                          => System_Pack_49,
-     RE_Get_49                           => System_Pack_49,
-     RE_Set_49                           => System_Pack_49,
-
-     RE_Bits_50                          => System_Pack_50,
-     RE_Get_50                           => System_Pack_50,
-     RE_GetU_50                          => System_Pack_50,
-     RE_Set_50                           => System_Pack_50,
-     RE_SetU_50                          => System_Pack_50,
-
-     RE_Bits_51                          => System_Pack_51,
-     RE_Get_51                           => System_Pack_51,
-     RE_Set_51                           => System_Pack_51,
-
-     RE_Bits_52                          => System_Pack_52,
-     RE_Get_52                           => System_Pack_52,
-     RE_GetU_52                          => System_Pack_52,
-     RE_Set_52                           => System_Pack_52,
-     RE_SetU_52                          => System_Pack_52,
-
-     RE_Bits_53                          => System_Pack_53,
-     RE_Get_53                           => System_Pack_53,
-     RE_Set_53                           => System_Pack_53,
-
-     RE_Bits_54                          => System_Pack_54,
-     RE_Get_54                           => System_Pack_54,
-     RE_GetU_54                          => System_Pack_54,
-     RE_Set_54                           => System_Pack_54,
-     RE_SetU_54                          => System_Pack_54,
-
-     RE_Bits_55                          => System_Pack_55,
-     RE_Get_55                           => System_Pack_55,
-     RE_Set_55                           => System_Pack_55,
-
-     RE_Bits_56                          => System_Pack_56,
-     RE_Get_56                           => System_Pack_56,
-     RE_GetU_56                          => System_Pack_56,
-     RE_Set_56                           => System_Pack_56,
-     RE_SetU_56                          => System_Pack_56,
-
-     RE_Bits_57                          => System_Pack_57,
-     RE_Get_57                           => System_Pack_57,
-     RE_Set_57                           => System_Pack_57,
-
-     RE_Bits_58                          => System_Pack_58,
-     RE_Get_58                           => System_Pack_58,
-     RE_GetU_58                          => System_Pack_58,
-     RE_Set_58                           => System_Pack_58,
-     RE_SetU_58                          => System_Pack_58,
-
-     RE_Bits_59                          => System_Pack_59,
-     RE_Get_59                           => System_Pack_59,
-     RE_Set_59                           => System_Pack_59,
-
-     RE_Bits_60                          => System_Pack_60,
-     RE_Get_60                           => System_Pack_60,
-     RE_GetU_60                          => System_Pack_60,
-     RE_Set_60                           => System_Pack_60,
-     RE_SetU_60                          => System_Pack_60,
-
-     RE_Bits_61                          => System_Pack_61,
-     RE_Get_61                           => System_Pack_61,
-     RE_Set_61                           => System_Pack_61,
-
-     RE_Bits_62                          => System_Pack_62,
-     RE_Get_62                           => System_Pack_62,
-     RE_GetU_62                          => System_Pack_62,
-     RE_Set_62                           => System_Pack_62,
-     RE_SetU_62                          => System_Pack_62,
-
-     RE_Bits_63                          => System_Pack_63,
-     RE_Get_63                           => System_Pack_63,
-     RE_Set_63                           => System_Pack_63,
-
-     RE_Adjust_Storage_Size              => System_Parameters,
-     RE_Default_Stack_Size               => System_Parameters,
-     RE_Garbage_Collected                => System_Parameters,
-     RE_Size_Type                        => System_Parameters,
-     RE_Unspecified_Size                 => System_Parameters,
-
-     RE_Get_Active_Partition_Id          => System_Partition_Interface,
-     RE_Get_Passive_Partition_Id         => System_Partition_Interface,
-     RE_Get_Local_Partition_Id           => System_Partition_Interface,
-     RE_Get_RCI_Package_Receiver         => System_Partition_Interface,
-     RE_Get_Unique_Remote_Pointer        => System_Partition_Interface,
-     RE_RACW_Stub_Type                   => System_Partition_Interface,
-     RE_RACW_Stub_Type_Access            => System_Partition_Interface,
-     RE_Raise_Program_Error_For_E_4_18   => System_Partition_Interface,
-     RE_Raise_Program_Error_Unknown_Tag  => System_Partition_Interface,
-     RE_Register_Passive_Package         => System_Partition_Interface,
-     RE_Register_Receiving_Stub          => System_Partition_Interface,
-     RE_RCI_Info                         => System_Partition_Interface,
-     RE_Subprogram_Id                    => System_Partition_Interface,
-
-     RE_Global_Pool_Object               => System_Pool_Global,
-
-     RE_Unbounded_Reclaim_Pool           => System_Pool_Local,
-
-     RE_Stack_Bounded_Pool               => System_Pool_Size,
-
-     RE_Do_Apc                           => System_RPC,
-     RE_Do_Rpc                           => System_RPC,
-     RE_Params_Stream_Type               => System_RPC,
-     RE_Partition_ID                     => System_RPC,
-     RE_RPC_Receiver                     => System_RPC,
-
-     RE_IS_Is1                           => System_Scalar_Values,
-     RE_IS_Is2                           => System_Scalar_Values,
-     RE_IS_Is4                           => System_Scalar_Values,
-     RE_IS_Is8                           => System_Scalar_Values,
-     RE_IS_Iu1                           => System_Scalar_Values,
-     RE_IS_Iu2                           => System_Scalar_Values,
-     RE_IS_Iu4                           => System_Scalar_Values,
-     RE_IS_Iu8                           => System_Scalar_Values,
-     RE_IS_Isf                           => System_Scalar_Values,
-     RE_IS_Ifl                           => System_Scalar_Values,
-     RE_IS_Ilf                           => System_Scalar_Values,
-     RE_IS_Ill                           => System_Scalar_Values,
-
-     RE_Mark_Id                          => System_Secondary_Stack,
-     RE_SS_Allocate                      => System_Secondary_Stack,
-     RE_SS_Mark                          => System_Secondary_Stack,
-     RE_SS_Pool                          => System_Secondary_Stack,
-     RE_SS_Release                       => System_Secondary_Stack,
-
-     RE_Shared_Var_Close                 => System_Shared_Storage,
-     RE_Shared_Var_Lock                  => System_Shared_Storage,
-     RE_Shared_Var_ROpen                 => System_Shared_Storage,
-     RE_Shared_Var_Unlock                => System_Shared_Storage,
-     RE_Shared_Var_WOpen                 => System_Shared_Storage,
-
-     RE_Abort_Undefer_Direct             => System_Standard_Library,
-     RE_Exception_Data_Ptr               => System_Standard_Library,
-
-     RE_Integer_Address                  => System_Storage_Elements,
-     RE_Storage_Offset                   => System_Storage_Elements,
-     RE_Storage_Array                    => System_Storage_Elements,
-     RE_To_Address                       => System_Storage_Elements,
-
-     RE_Root_Storage_Pool                => System_Storage_Pools,
-
-     RE_Thin_Pointer                     => System_Stream_Attributes,
-     RE_Fat_Pointer                      => System_Stream_Attributes,
-
-     RE_I_AD                             => System_Stream_Attributes,
-     RE_I_AS                             => System_Stream_Attributes,
-     RE_I_B                              => System_Stream_Attributes,
-     RE_I_C                              => System_Stream_Attributes,
-     RE_I_F                              => System_Stream_Attributes,
-     RE_I_I                              => System_Stream_Attributes,
-     RE_I_LF                             => System_Stream_Attributes,
-     RE_I_LI                             => System_Stream_Attributes,
-     RE_I_LLF                            => System_Stream_Attributes,
-     RE_I_LLI                            => System_Stream_Attributes,
-     RE_I_LLU                            => System_Stream_Attributes,
-     RE_I_LU                             => System_Stream_Attributes,
-     RE_I_SF                             => System_Stream_Attributes,
-     RE_I_SI                             => System_Stream_Attributes,
-     RE_I_SSI                            => System_Stream_Attributes,
-     RE_I_SSU                            => System_Stream_Attributes,
-     RE_I_SU                             => System_Stream_Attributes,
-     RE_I_U                              => System_Stream_Attributes,
-     RE_I_WC                             => System_Stream_Attributes,
-
-     RE_W_AD                             => System_Stream_Attributes,
-     RE_W_AS                             => System_Stream_Attributes,
-     RE_W_B                              => System_Stream_Attributes,
-     RE_W_C                              => System_Stream_Attributes,
-     RE_W_F                              => System_Stream_Attributes,
-     RE_W_I                              => System_Stream_Attributes,
-     RE_W_LF                             => System_Stream_Attributes,
-     RE_W_LI                             => System_Stream_Attributes,
-     RE_W_LLF                            => System_Stream_Attributes,
-     RE_W_LLI                            => System_Stream_Attributes,
-     RE_W_LLU                            => System_Stream_Attributes,
-     RE_W_LU                             => System_Stream_Attributes,
-     RE_W_SF                             => System_Stream_Attributes,
-     RE_W_SI                             => System_Stream_Attributes,
-     RE_W_SSI                            => System_Stream_Attributes,
-     RE_W_SSU                            => System_Stream_Attributes,
-     RE_W_SU                             => System_Stream_Attributes,
-     RE_W_U                              => System_Stream_Attributes,
-     RE_W_WC                             => System_Stream_Attributes,
-
-     RE_Str_Concat                       => System_String_Ops,
-     RE_Str_Equal                        => System_String_Ops,
-     RE_Str_Normalize                    => System_String_Ops,
-     RE_Wide_Str_Normalize               => System_String_Ops,
-     RE_Str_Concat_CC                    => System_String_Ops,
-     RE_Str_Concat_CS                    => System_String_Ops,
-     RE_Str_Concat_SC                    => System_String_Ops,
-
-     RE_Str_Concat_3                     => System_String_Ops_Concat_3,
-
-     RE_Str_Concat_4                     => System_String_Ops_Concat_4,
-
-     RE_Str_Concat_5                     => System_String_Ops_Concat_5,
-
-     RE_Free_Task_Image                  => System_Task_Info,
-     RE_Task_Info_Type                   => System_Task_Info,
-     RE_Task_Image_Type                  => System_Task_Info,
-     RE_Unspecified_Task_Info            => System_Task_Info,
-
-     RE_Library_Task_Level               => System_Tasking,
-
-     RE_Task_Procedure_Access            => System_Tasking,
-
-     RO_ST_Task_ID                       => System_Tasking,
-
-     RE_Call_Modes                       => System_Tasking,
-     RE_Simple_Call                      => System_Tasking,
-     RE_Conditional_Call                 => System_Tasking,
-     RE_Asynchronous_Call                => System_Tasking,
-     RE_Timed_Call                       => System_Tasking,
-
-     RE_Task_List                        => System_Tasking,
-
-     RE_Accept_Alternative               => System_Tasking,
-     RE_Accept_List                      => System_Tasking,
-     RE_Accept_List_Access               => System_Tasking,
-     RE_Max_Select                       => System_Tasking,
-     RE_Max_Task_Entry                   => System_Tasking,
-     RE_No_Rendezvous                    => System_Tasking,
-     RE_Null_Task_Entry                  => System_Tasking,
-     RE_Positive_Select_Index            => System_Tasking,
-     RE_Select_Index                     => System_Tasking,
-     RE_Select_Modes                     => System_Tasking,
-     RE_Else_Mode                        => System_Tasking,
-     RE_Simple_Mode                      => System_Tasking,
-     RE_Terminate_Mode                   => System_Tasking,
-     RE_Delay_Mode                       => System_Tasking,
-     RE_Task_Entry_Index                 => System_Tasking,
-     RE_Self                             => System_Tasking,
-
-     RE_Master_Id                        => System_Tasking,
-     RE_Unspecified_Priority             => System_Tasking,
-
-     RE_Activation_Chain                 => System_Tasking,
-
-     RE_Abort_Defer                      => System_Soft_Links,
-     RE_Abort_Undefer                    => System_Soft_Links,
-     RE_Complete_Master                  => System_Soft_Links,
-     RE_Current_Master                   => System_Soft_Links,
-     RE_Enter_Master                     => System_Soft_Links,
-     RE_Get_Current_Excep                => System_Soft_Links,
-     RE_Get_GNAT_Exception               => System_Soft_Links,
-     RE_Update_Exception                 => System_Soft_Links,
-
-     RE_Bits_1                           => System_Unsigned_Types,
-     RE_Bits_2                           => System_Unsigned_Types,
-     RE_Bits_4                           => System_Unsigned_Types,
-     RE_Float_Unsigned                   => System_Unsigned_Types,
-     RE_Long_Long_Unsigned               => System_Unsigned_Types,
-     RE_Packed_Byte                      => System_Unsigned_Types,
-     RE_Packed_Bytes1                    => System_Unsigned_Types,
-     RE_Packed_Bytes2                    => System_Unsigned_Types,
-     RE_Packed_Bytes4                    => System_Unsigned_Types,
-     RE_Unsigned                         => System_Unsigned_Types,
-
-     RE_Value_Boolean                    => System_Val_Bool,
-
-     RE_Value_Character                  => System_Val_Char,
-
-     RE_Value_Decimal                    => System_Val_Dec,
-
-     RE_Value_Enumeration_8              => System_Val_Enum,
-     RE_Value_Enumeration_16             => System_Val_Enum,
-     RE_Value_Enumeration_32             => System_Val_Enum,
-
-     RE_Value_Integer                    => System_Val_Int,
-
-     RE_Value_Long_Long_Decimal          => System_Val_LLD,
-
-     RE_Value_Long_Long_Integer          => System_Val_LLI,
-
-     RE_Value_Long_Long_Unsigned         => System_Val_LLU,
-
-     RE_Value_Real                       => System_Val_Real,
-
-     RE_Value_Unsigned                   => System_Val_Uns,
-
-     RE_Value_Wide_Character             => System_Val_WChar,
-
-     RE_D                                => System_Vax_Float_Operations,
-     RE_F                                => System_Vax_Float_Operations,
-     RE_G                                => System_Vax_Float_Operations,
-     RE_Q                                => System_Vax_Float_Operations,
-     RE_S                                => System_Vax_Float_Operations,
-     RE_T                                => System_Vax_Float_Operations,
-
-     RE_D_To_G                           => System_Vax_Float_Operations,
-     RE_F_To_G                           => System_Vax_Float_Operations,
-     RE_F_To_Q                           => System_Vax_Float_Operations,
-     RE_F_To_S                           => System_Vax_Float_Operations,
-     RE_G_To_D                           => System_Vax_Float_Operations,
-     RE_G_To_F                           => System_Vax_Float_Operations,
-     RE_G_To_Q                           => System_Vax_Float_Operations,
-     RE_G_To_T                           => System_Vax_Float_Operations,
-     RE_Q_To_F                           => System_Vax_Float_Operations,
-     RE_Q_To_G                           => System_Vax_Float_Operations,
-     RE_S_To_F                           => System_Vax_Float_Operations,
-     RE_T_To_D                           => System_Vax_Float_Operations,
-     RE_T_To_G                           => System_Vax_Float_Operations,
-
-     RE_Abs_F                            => System_Vax_Float_Operations,
-     RE_Abs_G                            => System_Vax_Float_Operations,
-     RE_Add_F                            => System_Vax_Float_Operations,
-     RE_Add_G                            => System_Vax_Float_Operations,
-     RE_Div_F                            => System_Vax_Float_Operations,
-     RE_Div_G                            => System_Vax_Float_Operations,
-     RE_Mul_F                            => System_Vax_Float_Operations,
-     RE_Mul_G                            => System_Vax_Float_Operations,
-     RE_Neg_F                            => System_Vax_Float_Operations,
-     RE_Neg_G                            => System_Vax_Float_Operations,
-     RE_Sub_F                            => System_Vax_Float_Operations,
-     RE_Sub_G                            => System_Vax_Float_Operations,
-
-     RE_Eq_F                             => System_Vax_Float_Operations,
-     RE_Eq_G                             => System_Vax_Float_Operations,
-     RE_Le_F                             => System_Vax_Float_Operations,
-     RE_Le_G                             => System_Vax_Float_Operations,
-     RE_Lt_F                             => System_Vax_Float_Operations,
-     RE_Lt_G                             => System_Vax_Float_Operations,
-
-     RE_Version_String                   => System_Version_Control,
-     RE_Get_Version_String               => System_Version_Control,
-
-     RE_Register_VMS_Exception           => System_VMS_Exception_Table,
-
-     RE_String_To_Wide_String            => System_WCh_StW,
-
-     RE_Wide_String_To_String            => System_WCh_WtS,
-
-     RE_Wide_Width_Character             => System_WWd_Char,
-
-     RE_Wide_Width_Enumeration_8         => System_WWd_Enum,
-     RE_Wide_Width_Enumeration_16        => System_WWd_Enum,
-     RE_Wide_Width_Enumeration_32        => System_WWd_Enum,
-
-     RE_Wide_Width_Wide_Character        => System_WWd_Wchar,
-
-     RE_Width_Boolean                    => System_Wid_Bool,
-
-     RE_Width_Character                  => System_Wid_Char,
-
-     RE_Width_Enumeration_8              => System_Wid_Enum,
-     RE_Width_Enumeration_16             => System_Wid_Enum,
-     RE_Width_Enumeration_32             => System_Wid_Enum,
-
-     RE_Width_Long_Long_Integer          => System_Wid_LLI,
-
-     RE_Width_Long_Long_Unsigned         => System_Wid_LLU,
-
-     RE_Width_Wide_Character             => System_Wid_WChar,
-
-     RE_Protected_Entry_Body_Array       =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Protection_Entries               =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Initialize_Protection_Entries    =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Lock_Entries                     =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Lock_Read_Only_Entries           =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Unlock_Entries                   =>
-       System_Tasking_Protected_Objects_Entries,
-     RE_Communication_Block              =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Protected_Entry_Call             =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Service_Entries                  =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Cancel_Protected_Entry_Call      =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Enqueued                         =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Cancelled                        =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Complete_Entry_Body              =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Exceptional_Complete_Entry_Body  =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Requeue_Protected_Entry          =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Requeue_Task_To_Protected_Entry  =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Protected_Count                  =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Protected_Entry_Caller           =>
-       System_Tasking_Protected_Objects_Operations,
-     RE_Timed_Protected_Entry_Call       =>
-       System_Tasking_Protected_Objects_Operations,
-
-     RE_Protection_Entry                 =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Initialize_Protection_Entry      =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Lock_Entry                       =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Lock_Read_Only_Entry             =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Unlock_Entry                     =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Protected_Single_Entry_Call      =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Service_Entry                    =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Complete_Single_Entry_Body       =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Exceptional_Complete_Single_Entry_Body =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Protected_Count_Entry            =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Protected_Single_Entry_Caller    =>
-       System_Tasking_Protected_Objects_Single_Entry,
-     RE_Timed_Protected_Single_Entry_Call =>
-       System_Tasking_Protected_Objects_Single_Entry,
-
-     RE_Protected_Entry_Index            => System_Tasking_Protected_Objects,
-     RE_Entry_Body                       => System_Tasking_Protected_Objects,
-     RE_Protection                       => System_Tasking_Protected_Objects,
-     RE_Initialize_Protection            => System_Tasking_Protected_Objects,
-     RE_Finalize_Protection              => System_Tasking_Protected_Objects,
-     RE_Lock                             => System_Tasking_Protected_Objects,
-     RE_Lock_Read_Only                   => System_Tasking_Protected_Objects,
-     RE_Unlock                           => System_Tasking_Protected_Objects,
-
-     RE_Delay_Block                      => System_Tasking_Async_Delays,
-     RE_Timed_Out                        => System_Tasking_Async_Delays,
-     RE_Cancel_Async_Delay               => System_Tasking_Async_Delays,
-     RE_Enqueue_Duration                 => System_Tasking_Async_Delays,
-
-     RE_Enqueue_Calendar                 =>
-       System_Tasking_Async_Delays_Enqueue_Calendar,
-     RE_Enqueue_RT                       =>
-       System_Tasking_Async_Delays_Enqueue_RT,
-
-     RE_Accept_Call                      => System_Tasking_Rendezvous,
-     RE_Accept_Trivial                   => System_Tasking_Rendezvous,
-     RE_Callable                         => System_Tasking_Rendezvous,
-     RE_Call_Simple                      => System_Tasking_Rendezvous,
-     RE_Cancel_Task_Entry_Call           => System_Tasking_Rendezvous,
-     RE_Requeue_Task_Entry               => System_Tasking_Rendezvous,
-     RE_Requeue_Protected_To_Task_Entry  => System_Tasking_Rendezvous,
-     RE_Complete_Rendezvous              => System_Tasking_Rendezvous,
-     RE_Task_Count                       => System_Tasking_Rendezvous,
-     RE_Exceptional_Complete_Rendezvous  => System_Tasking_Rendezvous,
-     RE_Selective_Wait                   => System_Tasking_Rendezvous,
-     RE_Task_Entry_Call                  => System_Tasking_Rendezvous,
-     RE_Task_Entry_Caller                => System_Tasking_Rendezvous,
-     RE_Timed_Task_Entry_Call            => System_Tasking_Rendezvous,
-     RE_Timed_Selective_Wait             => System_Tasking_Rendezvous,
-
-     RE_Activate_Restricted_Tasks        => System_Tasking_Restricted_Stages,
-     RE_Complete_Restricted_Activation   => System_Tasking_Restricted_Stages,
-     RE_Create_Restricted_Task           => System_Tasking_Restricted_Stages,
-     RE_Complete_Restricted_Task         => System_Tasking_Restricted_Stages,
-     RE_Restricted_Terminated            => System_Tasking_Restricted_Stages,
-
-     RE_Abort_Tasks                      => System_Tasking_Stages,
-     RE_Activate_Tasks                   => System_Tasking_Stages,
-     RE_Complete_Activation              => System_Tasking_Stages,
-     RE_Create_Task                      => System_Tasking_Stages,
-     RE_Complete_Task                    => System_Tasking_Stages,
-     RE_Free_Task                        => System_Tasking_Stages,
-     RE_Expunge_Unactivated_Tasks        => System_Tasking_Stages,
-     RE_Terminated                       => System_Tasking_Stages);
-
-   -----------------
-   -- Subprograms --
-   -----------------
-
-   procedure Initialize;
-   --  Procedure to initialize data structures used by RTE. Called at the
-   --  start of processing a new main source file. Must be called after
-   --  Initialize_Snames (since names it enters into name table must come
-   --  after names entered by Snames).
-
-   function RTE (E : RE_Id) return Entity_Id;
-   --  Given the entity defined in the above tables, as identified by the
-   --  corresponding value in the RE_Id enumeration type, returns the Id
-   --  of the corresponding entity, first loading in (parsing, analyzing and
-   --  expanding) its spec if the unit has not already been loaded. If the
-   --  unit cannot be found, or if it does not contain the specified entity,
-   --  then an appropriate error message is output ("run-time configuration
-   --  error") and an Unrecoverable_Error exception is raised. There is one
-   --  situation in which RTE can generate an error message, and that is if
-   --  an unuathorized entity is accessed in high integrity mode. If this
-   --  occurs, the result returned may be Empty, and the caller must deal
-   --  with this possibility if the call to RTE may occur in high integrity
-   --  mode (often this will have been ruled out by specific checks for
-   --  high integrity mode prior to the RTE call).
-
-   function Is_RTE (Ent : Entity_Id; E : RE_Id) return Boolean;
-   --  This function determines if the given entity corresponds to the entity
-   --  referenced by RE_Id. It is similar in effect to (Ent = RTE (E)) except
-   --  that the latter would unconditionally load the unit containing E. For
-   --  this call, if the unit is not loaded, then a result of False is returned
-   --  immediately, since obviously Ent cannot be the entity in question if the
-   --  corresponding unit has not been loaded.
-
-   procedure Text_IO_Kludge (Nam : Node_Id);
-   --  In Ada 83, and hence for compatibility in Ada 9X, package Text_IO has
-   --  generic subpackages (e.g. Integer_IO). They really should be child
-   --  packages, and in GNAT, they *are* child packages. To maintain the
-   --  required compatibility, this routine is called for package renamings
-   --  and generic instantiations, with the simple name of the referenced
-   --  package. If Text_IO has been with'ed and if the simple name of Nam
-   --  matches one of the subpackages of Text_IO, then this subpackage is
-   --  with'ed automatically. The important result of this approach is that
-   --  Text_IO does not drag in all the code for the subpackages unless they
-   --  are used. Our test is a little crude, and could drag in stuff when it
-   --  is not necessary, but that doesn't matter. Wide_Text_IO is handled in
-   --  a similar manner.
-
-   function Is_Text_IO_Kludge_Unit (Nam : Node_Id) return Boolean;
-   --  Returns True if the given Nam is an Expanded Name, whose Prefix is
-   --  Ada, and whose selector is either Text_IO.xxx or Wide_Text_IO.xxx
-   --  where xxx is one of the subpackages of Text_IO that is specially
-   --  handled as described above for Text_IO_Kludge.
-
-end Rtsfind;