X-Git-Url: https://oss.titaniummirror.com/gitweb/?a=blobdiff_plain;f=gcc%2Fada%2Frtsfind.ads;fp=gcc%2Fada%2Frtsfind.ads;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=7a4adb8a2c6a9e045939589f798469d133157720;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/ada/rtsfind.ads b/gcc/ada/rtsfind.ads deleted file mode 100644 index 7a4adb8a..00000000 --- a/gcc/ada/rtsfind.ads +++ /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;