-- --
-- S p e c --
-- --
--- --
--- Copyright (C) 1992-2001, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2007, 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- --
-- 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. --
+-- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, --
+-- Boston, MA 02110-1301, USA. --
-- --
-- GNAT was originally developed by the GNAT team at New York University. --
-- Extensive contributions were provided by Ada Core Technologies Inc. --
-- delays; eventually, packages implementing delays will be found
-- relative to the package that declares the time type.
+ -- Names of the form Ada_Finalization_xxx are second level children
+ -- of Ada.Finalization.
+
+ -- Names of the form Ada_Interrupts_xxx are second level children
+ -- of Ada.Interrupts. This is needed for Ada.Interrupts.Names which
+ -- is used by pragma Interrupt_State.
+
+ -- Names of the form Ada_Real_Time_xxx are second level children
+ -- of Ada.Real_Time.
+
+ -- Names of the form Ada_Streams_xxx are second level children
+ -- of Ada.Streams.
+
+ -- Names of the form Ada_Text_IO_xxx are second level children
+ -- of Ada.Text_IO.
+
+ -- Names of the form Ada_Wide_Text_IO_xxx are second level children
+ -- of Ada.Wide_Text_IO.
+
+ -- Names of the form Ada_Wide_Wide_Text_IO_xxx are second level children
+ -- of Ada.Wide_Wide_Text_IO.
+
-- Names of the form Interfaces_xxx are first level children of
-- Interfaces_CPP refers to package Interfaces.CPP
-- 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.
+ -- it doesn't seem worthwhile, since the implementation controls the
+ -- set of units that are referenced, and this restriction 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
-- package see declarations in the runtime entity table below.
RTU_Null,
- -- Used as a null entry. Will cause an error if referenced.
+ -- Used as a null entry. Will cause an error if referenced
-- Children of Ada
Ada_Streams,
Ada_Tags,
Ada_Task_Identification,
+ Ada_Task_Termination,
-- Children of Ada.Calendar
Ada_Finalization_List_Controller,
+ -- Children of Ada.Interrupts
+
+ Ada_Interrupts_Names,
+
-- Children of Ada.Real_Time
Ada_Real_Time_Delays,
Ada_Wide_Text_IO_Integer_IO,
Ada_Wide_Text_IO_Modular_IO,
+ -- Children of Ada.Wide_Wide_Text_IO (for Text_IO_Kludge)
+
+ Ada_Wide_Wide_Text_IO_Decimal_IO,
+ Ada_Wide_Wide_Text_IO_Enumeration_IO,
+ Ada_Wide_Wide_Text_IO_Fixed_IO,
+ Ada_Wide_Wide_Text_IO_Float_IO,
+ Ada_Wide_Wide_Text_IO_Integer_IO,
+ Ada_Wide_Wide_Text_IO_Modular_IO,
+
-- Interfaces
Interfaces,
-- Children of System
+ System_Address_Image,
System_Arith_64,
System_AST_Handling,
System_Assertions,
System_Aux_DEC,
System_Bit_Ops,
+ System_Boolean_Array_Operations,
System_Checked_Pools,
+ System_Compare_Array_Signed_16,
+ System_Compare_Array_Signed_32,
+ System_Compare_Array_Signed_64,
+ System_Compare_Array_Signed_8,
+ System_Compare_Array_Unsigned_16,
+ System_Compare_Array_Unsigned_32,
+ System_Compare_Array_Unsigned_64,
+ System_Compare_Array_Unsigned_8,
+ System_DSA_Services,
System_Exception_Table,
System_Exceptions,
- 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_IEEE_Long_Float,
+ System_Fat_IEEE_Short_Float,
System_Fat_LFlt,
System_Fat_LLF,
System_Fat_SFlt,
+ System_Fat_VAX_D_Float,
+ System_Fat_VAX_F_Float,
+ System_Fat_VAX_G_Float,
System_Finalization_Implementation,
System_Finalization_Root,
System_Fore,
System_Interrupts,
System_Machine_Code,
System_Mantissa,
+ System_Memcop,
System_Pack_03,
System_Pack_05,
System_Pack_06,
System_String_Ops_Concat_5,
System_Task_Info,
System_Tasking,
+ System_Threads,
System_Unsigned_Types,
System_Val_Bool,
System_Val_Char,
System_Tasking_Stages);
subtype Ada_Child is RTU_Id
- range Ada_Calendar .. Ada_Wide_Text_IO_Modular_IO;
+ range Ada_Calendar .. Ada_Wide_Wide_Text_IO_Modular_IO;
-- Range of values for children or grand-children of Ada
subtype Ada_Calendar_Child is Ada_Child
Ada_Finalization_List_Controller .. Ada_Finalization_List_Controller;
-- Range of values for children of Ada.Finalization
+ subtype Ada_Interrupts_Child is Ada_Child range
+ Ada_Interrupts_Names .. Ada_Interrupts_Names;
+ -- Range of values for children of Ada.Interrupts
+
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
range Ada_Wide_Text_IO_Decimal_IO .. Ada_Wide_Text_IO_Modular_IO;
-- Range of values for children of Ada.Text_IO
+ subtype Ada_Wide_Wide_Text_IO_Child is Ada_Child
+ range Ada_Wide_Wide_Text_IO_Decimal_IO ..
+ Ada_Wide_Wide_Text_IO_Modular_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 System_Address_Image .. System_Tasking_Stages;
-- Range of values for children or grandchildren of System
subtype System_Tasking_Child is System_Child
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 --
--------------------------
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_Raise_From_Controlled_Operation, -- Ada.Exceptions
RE_Reraise_Occurrence, -- Ada.Exceptions
RE_Reraise_Occurrence_Always, -- Ada.Exceptions
RE_Reraise_Occurrence_No_Defer, -- Ada.Exceptions
RE_Simple_List_Controller, -- Ada.Finalization.List_Controller
RE_List_Controller, -- Ada.Finalization.List_Controller
- RE_Interrupt_Id, -- Ada.Interrupts
+ RE_Interrupt_ID, -- Ada.Interrupts
+ RE_Is_Reserved, -- Ada.Interrupts
+ RE_Is_Attached, -- Ada.Interrupts
+ RE_Current_Handler, -- Ada.Interrupts
+ RE_Attach_Handler, -- Ada.Interrupts
+ RE_Exchange_Handler, -- Ada.Interrupts
+ RE_Detach_Handler, -- Ada.Interrupts
+ RE_Reference, -- Ada.Interrupts
+
+ RE_Names, -- Ada.Interupts.Names
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_Access_Level, -- Ada.Tags
+ RE_Address_Array, -- Ada.Tags
+ RE_Addr_Ptr, -- Ada.Tags
+ RE_Base_Address, -- Ada.Tags
+ RE_Cstring_Ptr, -- Ada.Tags
+ RE_Default_Prim_Op_Count, -- Ada.Tags
+ RE_Descendant_Tag, -- Ada.Tags
+ RE_Dispatch_Table, -- Ada.Tags
+ RE_Dispatch_Table_Wrapper, -- Ada.Tags
+ RE_Displace, -- Ada.Tags
+ RE_DT, -- Ada.Tags
+ RE_DT_Predef_Prims_Offset, -- Ada.Tags
+ RE_DT_Typeinfo_Ptr_Size, -- Ada.Tags
+ RE_Expanded_Name, -- 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_HT_Link, -- Ada.Tags
+ RO_TA_External_Tag, -- Ada.Tags
+ RE_Get_Access_Level, -- Ada.Tags
+ RE_Get_Entry_Index, -- Ada.Tags
+ RE_Get_Offset_Index, -- Ada.Tags
+ RE_Get_Prim_Op_Kind, -- Ada.Tags
+ RE_Get_Tagged_Kind, -- Ada.Tags
+ RE_Idepth, -- Ada.Tags
+ RE_Iface_Tag, -- Ada.Tags
+ RE_Ifaces_Table, -- Ada.Tags
+ RE_Interfaces_Table, -- Ada.Tags
+ RE_Interface_Data, -- Ada.Tags
+ RE_Interface_Tag, -- Ada.Tags
+ RE_IW_Membership, -- Ada.Tags
+ RE_Nb_Ifaces, -- Ada.Tags
+ RE_No_Dispatch_Table_Wrapper, -- Ada.Tags
+ RE_NDT_Prims_Ptr, -- Ada.Tags
+ RE_NDT_TSD, -- Ada.Tags
+ RE_Num_Prims, -- Ada.Tags
+ RE_Object_Specific_Data, -- Ada.Tags
+ RE_Offset_To_Top, -- Ada.Tags
+ RE_Offset_To_Top_Function_Ptr, -- Ada.Tags
+ RE_OSD_Table, -- Ada.Tags
+ RE_OSD_Num_Prims, -- Ada.Tags
+ RE_POK_Function, -- Ada.Tags
+ RE_POK_Procedure, -- Ada.Tags
+ RE_POK_Protected_Entry, -- Ada.Tags
+ RE_POK_Protected_Function, -- Ada.Tags
+ RE_POK_Protected_Procedure, -- Ada.Tags
+ RE_POK_Task_Entry, -- Ada.Tags
+ RE_POK_Task_Function, -- Ada.Tags
+ RE_POK_Task_Procedure, -- Ada.Tags
+ RE_Predef_Prims, -- Ada.Tags
+ RE_Predef_Prims_Table_Ptr, -- Ada.Tags
+ RE_Prim_Op_Kind, -- Ada.Tags
+ RE_Prims_Ptr, -- Ada.Tags
+ RE_Primary_DT, -- Ada.Tags
+ RE_Signature, -- Ada.Tags
+ RE_SSD, -- Ada.Tags
+ RE_TSD, -- Ada.Tags
+ RE_Type_Specific_Data, -- 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_Transportable, -- Ada.Tags
+ RE_RC_Offset, -- Ada.Tags
+ RE_Secondary_DT, -- Ada.Tags
+ RE_Select_Specific_Data, -- Ada.Tags
+ RE_Set_Entry_Index, -- Ada.Tags
+ RE_Set_Offset_To_Top, -- Ada.Tags
+ RE_Set_Prim_Op_Kind, -- Ada.Tags
+ RE_Static_Offset_To_Top, -- Ada.Tags
RE_Tag, -- Ada.Tags
- RE_Address_Array, -- Ada.Tags
-
+ RE_Tag_Error, -- Ada.Tags
+ RE_Tag_Kind, -- Ada.Tags
+ RE_Tag_Ptr, -- Ada.Tags
+ RE_Tag_Table, -- Ada.Tags
+ RE_Tags_Table, -- Ada.Tags
+ RE_Tagged_Kind, -- Ada.Tags
+ RE_Type_Specific_Data_Ptr, -- Ada.Tags
+ RE_TK_Abstract_Limited_Tagged, -- Ada.Tags
+ RE_TK_Abstract_Tagged, -- Ada.Tags
+ RE_TK_Limited_Tagged, -- Ada.Tags
+ RE_TK_Protected, -- Ada.Tags
+ RE_TK_Tagged, -- Ada.Tags
+ RE_TK_Task, -- Ada.Tags
+
+ RE_Abort_Task, -- Ada.Task_Identification
RE_Current_Task, -- Ada.Task_Identification
- RO_AT_Task_ID, -- Ada.Task_Identification
+ RO_AT_Task_Id, -- Ada.Task_Identification
RO_CA_Time, -- Ada.Calendar
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_Address_Image, -- System.Address_Image
+
RE_Add_With_Ovflo_Check, -- System.Arith_64
RE_Double_Divide, -- System.Arith_64
RE_Multiply_With_Ovflo_Check, -- System.Arith_64
RE_Create_AST_Handler, -- System.AST_Handling
+ RE_Assert_Failure, -- System.Assertions
RE_Raise_Assert_Failure, -- System.Assertions
RE_AST_Handler, -- System.Aux_DEC
RE_Bit_Or, -- System.Bit_Ops
RE_Bit_Xor, -- System.Bit_Ops
+ RE_Vector_Not, -- System_Boolean_Array_Operations,
+ RE_Vector_And, -- System_Boolean_Array_Operations,
+ RE_Vector_Or, -- System_Boolean_Array_Operations,
+ RE_Vector_Nand, -- System_Boolean_Array_Operations,
+ RE_Vector_Nor, -- System_Boolean_Array_Operations,
+ RE_Vector_Nxor, -- System_Boolean_Array_Operations,
+ RE_Vector_Xor, -- System_Boolean_Array_Operations,
+
RE_Checked_Pool, -- System.Checked_Pools
- RE_Register_Exception, -- System.Exception_Table
+ RE_Compare_Array_S8, -- System.Compare_Array_Signed_8
+ RE_Compare_Array_S8_Unaligned, -- System.Compare_Array_Signed_8
- 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_Compare_Array_S16, -- System.Compare_Array_Signed_16
- RE_Exn_Integer, -- System.Exn_Int
+ RE_Compare_Array_S32, -- System.Compare_Array_Signed_16
- RE_Exn_Long_Float, -- System.Exn_LFlt
+ RE_Compare_Array_S64, -- System.Compare_Array_Signed_16
- RE_Exn_Long_Integer, -- System.Exn_LInt
+ RE_Compare_Array_U8, -- System.Compare_Array_Unsigned_8
+ RE_Compare_Array_U8_Unaligned, -- System.Compare_Array_Unsigned_8
- RE_Exn_Long_Long_Float, -- System.Exn_LLF
+ RE_Compare_Array_U16, -- System.Compare_Array_Unsigned_16
- RE_Exn_Long_Long_Integer, -- System.Exn_LLI
+ RE_Compare_Array_U32, -- System.Compare_Array_Unsigned_16
- RE_Exn_Short_Float, -- System.Exn_SFlt
+ RE_Compare_Array_U64, -- System.Compare_Array_Unsigned_16
- RE_Exn_Short_Integer, -- System.Exn_SInt
+ RE_Get_Active_Partition_Id, -- System.DSA_Services
+ RE_Get_Local_Partition_Id, -- System.DSA_Services
+ RE_Get_Passive_Partition_Id, -- System.DSA_Services
- RE_Exn_Short_Short_Integer, -- System.Exn_SSI
+ RE_Register_Exception, -- System.Exception_Table
- RE_Exp_Float, -- System.Exp_Flt
+ RE_Local_Raise, -- System.Exceptions
- RE_Exp_Integer, -- System.Exp_Int
+ RE_Exn_Integer, -- System.Exn_Int
- RE_Exp_Long_Float, -- System.Exp_LFlt
+ RE_Exn_Long_Long_Float, -- System.Exn_LLF
- RE_Exp_Long_Integer, -- System.Exp_LInt
+ RE_Exn_Long_Long_Integer, -- System.Exn_LLI
- RE_Exp_Long_Long_Float, -- System.Exp_LLF
+ RE_Exp_Integer, -- System.Exp_Int
RE_Exp_Long_Long_Integer, -- System.Exp_LLI
RE_Exp_Modular, -- System.Exp_Mod
- RE_Exp_Short_Float, -- System.Exp_SFlt
+ RE_Exp_Unsigned, -- System.Exp_Uns
- RE_Exp_Short_Integer, -- System.Exp_SInt
+ RE_Attr_Float, -- System.Fat_Flt
- RE_Exp_Short_Short_Integer, -- System.Exp_SSI
+ RE_Attr_IEEE_Long, -- System.Fat_IEEE_Long_Float
+ RE_Fat_IEEE_Long, -- System.Fat_IEEE_Long_Float
- RE_Exp_Unsigned, -- System.Exp_Uns
+ RE_Attr_IEEE_Short, -- System.Fat_IEEE_Short_Float
+ RE_Fat_IEEE_Short, -- System.Fat_IEEE_Short_Float
- RE_Fat_Float, -- System.Fat_Flt
+ RE_Attr_Long_Float, -- System.Fat_LFlt
- RE_Fat_Long_Float, -- System.Fat_LFlt
+ RE_Attr_Long_Long_Float, -- System.Fat_LLF
- RE_Fat_Long_Long_Float, -- System.Fat_LLF
+ RE_Attr_Short_Float, -- System.Fat_SFlt
- RE_Fat_Short_Float, -- System.Fat_SFlt
+ RE_Attr_VAX_D_Float, -- System.Fat_VAX_D_Float
+ RE_Fat_VAX_D, -- System.Fat_VAX_D_Float
+
+ RE_Attr_VAX_F_Float, -- System.Fat_VAX_F_Float
+ RE_Fat_VAX_F, -- System.Fat_VAX_F_Float
+
+ RE_Attr_VAX_G_Float, -- System.Fat_VAX_G_Float
+ RE_Fat_VAX_G, -- System.Fat_VAX_G_Float
RE_Attach_To_Final_List, -- System.Finalization_Implementation
+ RE_Finalizable_Ptr_Ptr, -- System.Finalization_Implementation
+ RE_Move_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_Image_Unsigned, -- System.Img_Uns
RE_Image_Wide_Character, -- System.Img_WChar
+ RE_Image_Wide_Wide_Character, -- System.Img_WChar
RE_Bind_Interrupt_To_Entry, -- System.Interrupts
RE_Default_Interrupt_Priority, -- System.Interrupts
RE_Install_Handlers, -- System.Interrupts
RE_Register_Interrupt_Handler, -- System.Interrupts
RE_Static_Interrupt_Protection, -- System.Interrupts
+ RE_System_Interrupt_Id, -- System.Interrupts
RE_Asm_Insn, -- System.Machine_Code
RE_Asm_Input_Operand, -- System.Machine_Code
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_DSA_Implementation, -- 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_RAS_Proxy_Type_Access, -- 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_Request_Access, -- System.Partition_Interface
+ RE_RCI_Locator, -- System.Partition_Interface
+ RE_RCI_Subp_Info, -- System.Partition_Interface
+ RE_RCI_Subp_Info_Array, -- System.Partition_Interface
+ RE_Same_Partition, -- System.Partition_Interface
RE_Subprogram_Id, -- System.Partition_Interface
+ RE_Get_RAS_Info, -- 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_To_PolyORB_String, -- System.Partition_Interface
+ RE_Caseless_String_Eq, -- System.Partition_Interface
+ RE_TypeCode, -- System.Partition_Interface
+ RE_Any, -- System.Partition_Interface
+ RE_Mode_In, -- System.Partition_Interface
+ RE_Mode_Out, -- System.Partition_Interface
+ RE_Mode_Inout, -- System.Partition_Interface
+ RE_NamedValue, -- System.Partition_Interface
+ RE_Result_Name, -- System.Partition_Interface
+ RE_Object_Ref, -- System.Partition_Interface
+ RE_Create_Any, -- System.Partition_Interface
+ RE_Any_Aggregate_Build, -- System.Partition_Interface
+ RE_Add_Aggregate_Element, -- System.Partition_Interface
+ RE_Get_Aggregate_Element, -- System.Partition_Interface
+ RE_Content_Type, -- System.Partition_Interface
+ RE_Any_Member_Type, -- System.Partition_Interface
+ RE_Get_Nested_Sequence_Length, -- System.Partition_Interface
+ RE_Get_Any_Type, -- System.Partition_Interface
+ RE_Extract_Union_Value, -- System.Partition_Interface
+ RE_NVList_Ref, -- System.Partition_Interface
+ RE_NVList_Create, -- System.Partition_Interface
+ RE_NVList_Add_Item, -- System.Partition_Interface
+ RE_Request_Create, -- System.Partition_Interface
+ RE_Request_Invoke, -- System.Partition_Interface
+ RE_Request_Arguments, -- System.Partition_Interface
+ RE_Request_Set_Out, -- System.Partition_Interface
+ RE_Request_Raise_Occurrence, -- System.Partition_Interface
+ RE_Nil_Exc_List, -- System.Partition_Interface
+ RE_Servant, -- System.Partition_Interface
+ RE_Move_Any_Value, -- System.Partition_Interface
+ RE_Set_Result, -- System.Partition_Interface
+ RE_Register_Obj_Receiving_Stub, -- System.Partition_Interface
+ RE_Register_Pkg_Receiving_Stub, -- System.Partition_Interface
+ RE_Is_Nil, -- System.Partition_Interface
+ RE_Entity_Ptr, -- System.Partition_Interface
+ RE_Entity_Of, -- System.Partition_Interface
+ RE_Inc_Usage, -- System.Partition_Interface
+ RE_Set_Ref, -- System.Partition_Interface
+ RE_Make_Ref, -- System.Partition_Interface
+ RE_Get_Local_Address, -- System.Partition_Interface
+ RE_Get_Reference, -- System.Partition_Interface
+ RE_Asynchronous_P_To_Sync_Scope, -- System.Partition_Interface
+ RE_Buffer_Stream_Type, -- System.Partition_Interface
+ RE_Allocate_Buffer, -- System.Partition_Interface
+ RE_Release_Buffer, -- System.Partition_Interface
+ RE_BS_To_Any, -- System.Partition_Interface
+ RE_Any_To_BS, -- System.Partition_Interface
+
+ RE_FA_B, -- System.Partition_Interface
+ RE_FA_C, -- System.Partition_Interface
+ RE_FA_F, -- System.Partition_Interface
+ RE_FA_I, -- System.Partition_Interface
+ RE_FA_LF, -- System.Partition_Interface
+ RE_FA_LI, -- System.Partition_Interface
+ RE_FA_LLF, -- System.Partition_Interface
+ RE_FA_LLI, -- System.Partition_Interface
+ RE_FA_LLU, -- System.Partition_Interface
+ RE_FA_LU, -- System.Partition_Interface
+ RE_FA_SF, -- System.Partition_Interface
+ RE_FA_SI, -- System.Partition_Interface
+ RE_FA_SSI, -- System.Partition_Interface
+ RE_FA_SSU, -- System.Partition_Interface
+ RE_FA_SU, -- System.Partition_Interface
+ RE_FA_U, -- System.Partition_Interface
+ RE_FA_WC, -- System.Partition_Interface
+ RE_FA_WWC, -- System.Partition_Interface
+ RE_FA_String, -- System.Partition_Interface
+ RE_FA_ObjRef, -- System.Partition_Interface
+
+ RE_TA_A, -- System.Partition_Interface
+ RE_TA_B, -- System.Partition_Interface
+ RE_TA_C, -- System.Partition_Interface
+ RE_TA_F, -- System.Partition_Interface
+ RE_TA_I, -- System.Partition_Interface
+ RE_TA_LF, -- System.Partition_Interface
+ RE_TA_LI, -- System.Partition_Interface
+ RE_TA_LLF, -- System.Partition_Interface
+ RE_TA_LLI, -- System.Partition_Interface
+ RE_TA_LLU, -- System.Partition_Interface
+ RE_TA_LU, -- System.Partition_Interface
+ RE_TA_SF, -- System.Partition_Interface
+ RE_TA_SI, -- System.Partition_Interface
+ RE_TA_SSI, -- System.Partition_Interface
+ RE_TA_SSU, -- System.Partition_Interface
+ RE_TA_SU, -- System.Partition_Interface
+ RE_TA_U, -- System.Partition_Interface
+ RE_TA_WC, -- System.Partition_Interface
+ RE_TA_WWC, -- System.Partition_Interface
+ RE_TA_String, -- System.Partition_Interface
+ RE_TA_ObjRef, -- System.Partition_Interface
+ RE_TA_TC, -- System.Partition_Interface
+
+ RE_TC_Alias, -- System.Partition_Interface
+ RE_TC_Build, -- System.Partition_Interface
+ RE_Get_TC, -- System.Partition_Interface
+ RE_Set_TC, -- System.Partition_Interface
+ RE_TC_Any, -- System.Partition_Interface
+ RE_TC_B, -- System.Partition_Interface
+ RE_TC_C, -- System.Partition_Interface
+ RE_TC_F, -- System.Partition_Interface
+ RE_TC_I, -- System.Partition_Interface
+ RE_TC_LF, -- System.Partition_Interface
+ RE_TC_LI, -- System.Partition_Interface
+ RE_TC_LLF, -- System.Partition_Interface
+ RE_TC_LLI, -- System.Partition_Interface
+ RE_TC_LLU, -- System.Partition_Interface
+ RE_TC_LU, -- System.Partition_Interface
+ RE_TC_SF, -- System.Partition_Interface
+ RE_TC_SI, -- System.Partition_Interface
+ RE_TC_SSI, -- System.Partition_Interface
+ RE_TC_SSU, -- System.Partition_Interface
+ RE_TC_SU, -- System.Partition_Interface
+ RE_TC_U, -- System.Partition_Interface
+ RE_TC_Void, -- System.Partition_Interface
+ RE_TC_Opaque, -- System.Partition_Interface
+ RE_TC_WC, -- System.Partition_Interface
+ RE_TC_WWC, -- System.Partition_Interface
+ RE_TC_Array, -- System.Partition_Interface
+ RE_TC_Sequence, -- System.Partition_Interface
+ RE_TC_String, -- System.Partition_Interface
+ RE_TC_Struct, -- System.Partition_Interface
+ RE_TC_Union, -- System.Partition_Interface
+ RE_TC_Object, -- System.Partition_Interface
RE_IS_Is1, -- System.Scalar_Values
RE_IS_Is2, -- System.Scalar_Values
RE_IS_Iu2, -- System.Scalar_Values
RE_IS_Iu4, -- System.Scalar_Values
RE_IS_Iu8, -- System.Scalar_Values
+ RE_IS_Iz1, -- System.Scalar_Values
+ RE_IS_Iz2, -- System.Scalar_Values
+ RE_IS_Iz4, -- System.Scalar_Values
+ RE_IS_Iz8, -- 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_Default_Secondary_Stack_Size, -- System.Secondary_Stack
RE_Mark_Id, -- System.Secondary_Stack
RE_SS_Allocate, -- System.Secondary_Stack
RE_SS_Pool, -- System.Secondary_Stack
RE_Shared_Var_WOpen, -- System.Shared_Storage
RE_Abort_Undefer_Direct, -- System.Standard_Library
+ RE_Exception_Code, -- 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_Dummy_Communication_Block, -- System.Storage_Elements
RE_Root_Storage_Pool, -- System.Storage_Pools
-
- RE_Thin_Pointer, -- System.Stream_Attributes
- RE_Fat_Pointer, -- System.Stream_Attributes
+ RE_Allocate_Any, -- System_Storage_Pools,
+ RE_Deallocate_Any, -- System_Storage_Pools,
RE_I_AD, -- System.Stream_Attributes
RE_I_AS, -- System.Stream_Attributes
RE_I_SU, -- System.Stream_Attributes
RE_I_U, -- System.Stream_Attributes
RE_I_WC, -- System.Stream_Attributes
+ RE_I_WWC, -- System.Stream_Attributes
RE_W_AD, -- System.Stream_Attributes
RE_W_AS, -- System.Stream_Attributes
RE_W_SU, -- System.Stream_Attributes
RE_W_U, -- System.Stream_Attributes
RE_W_WC, -- System.Stream_Attributes
+ RE_W_WWC, -- 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_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
+ RO_ST_Task_Id, -- System.Tasking
+ RO_ST_Null_Task, -- 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_Ada_Task_Control_Block, -- 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_Unspecified_Priority, -- System.Tasking
RE_Activation_Chain, -- System.Tasking
+ RE_Activation_Chain_Access, -- System.Tasking
+ RE_Storage_Size, -- System.Tasking
RE_Abort_Defer, -- System.Soft_Links
RE_Abort_Undefer, -- System.Soft_Links
RE_Bits_2, -- System.Unsigned_Types
RE_Bits_4, -- System.Unsigned_Types
RE_Float_Unsigned, -- System.Unsigned_Types
+ RE_Long_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_Short_Unsigned, -- System.Unsigned_Types
+ RE_Short_Short_Unsigned, -- System.Unsigned_Types
RE_Unsigned, -- System.Unsigned_Types
RE_Value_Boolean, -- System.Val_Bool
RE_Value_Unsigned, -- System.Val_Uns
RE_Value_Wide_Character, -- System.Val_WChar
+ RE_Value_Wide_Wide_Character, -- System.Val_WChar
RE_D, -- System.Vax_Float_Operations
RE_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_Ne_F, -- System.Vax_Float_Operations
+ RE_Ne_G, -- System.Vax_Float_Operations
+
+ RE_Valid_D, -- System.Vax_Float_Operations
+ RE_Valid_F, -- System.Vax_Float_Operations
+ RE_Valid_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_String_To_Wide_Wide_String, -- System.WCh_StW
RE_Wide_String_To_String, -- System.WCh_WtS
+ RE_Wide_Wide_String_To_String, -- System.WCh_WtS
RE_Wide_Width_Character, -- System.WWd_Char
+ RE_Wide_Wide_Width_Character, -- System.WWd_Char
+
+ RE_Wide_Wide_Width_Enumeration_8, -- System.WWd_Enum
+ RE_Wide_Wide_Width_Enumeration_16, -- System.WWd_Enum
+ RE_Wide_Wide_Width_Enumeration_32, -- System.WWd_Enum
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_Wide_Width_Wide_Character, -- System.WWd_Wchar
+ RE_Wide_Wide_Width_Wide_Wide_Char, -- System.WWd_Wchar
RE_Wide_Width_Wide_Character, -- System.WWd_Wchar
+ RE_Wide_Width_Wide_Wide_Character, -- System.WWd_Wchar
RE_Width_Boolean, -- System.Wid_Bool
RE_Width_Long_Long_Unsigned, -- System.Wid_LLU
RE_Width_Wide_Character, -- System.Wid_WChar
+ RE_Width_Wide_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
+ RO_PE_Get_Ceiling, -- Tasking.Protected_Objects.Entries
+ RO_PE_Set_Ceiling, -- 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_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_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_Get_Ceiling, -- System.Tasking.Protected_Objects
+ RE_Set_Ceiling, -- System.Tasking.Protected_Objects
RE_Unlock, -- System.Tasking.Protected_Objects
RE_Delay_Block, -- System.Tasking.Async_Delays
RE_Complete_Task, -- System.Tasking.Stages
RE_Free_Task, -- System.Tasking.Stages
RE_Expunge_Unactivated_Tasks, -- System.Tasking.Stages
+ RE_Move_Activation_Chain, -- System_Tasking_Stages
RE_Terminated); -- System.Tasking.Stages
-- The following declarations build a table that is indexed by the
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_Raise_From_Controlled_Operation => Ada_Exceptions,
RE_Reraise_Occurrence => Ada_Exceptions,
RE_Reraise_Occurrence_Always => Ada_Exceptions,
RE_Reraise_Occurrence_No_Defer => Ada_Exceptions,
RE_Simple_List_Controller => Ada_Finalization_List_Controller,
RE_List_Controller => Ada_Finalization_List_Controller,
- RE_Interrupt_Id => Ada_Interrupts,
+ RE_Interrupt_ID => Ada_Interrupts,
+ RE_Is_Reserved => Ada_Interrupts,
+ RE_Is_Attached => Ada_Interrupts,
+ RE_Current_Handler => Ada_Interrupts,
+ RE_Attach_Handler => Ada_Interrupts,
+ RE_Exchange_Handler => Ada_Interrupts,
+ RE_Detach_Handler => Ada_Interrupts,
+ RE_Reference => Ada_Interrupts,
+
+ RE_Names => Ada_Interrupts_Names,
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_Access_Level => Ada_Tags,
+ RE_Address_Array => Ada_Tags,
+ RE_Addr_Ptr => Ada_Tags,
+ RE_Base_Address => Ada_Tags,
+ RE_Cstring_Ptr => Ada_Tags,
+ RE_Default_Prim_Op_Count => Ada_Tags,
+ RE_Descendant_Tag => Ada_Tags,
+ RE_Dispatch_Table => Ada_Tags,
+ RE_Dispatch_Table_Wrapper => Ada_Tags,
+ RE_Displace => Ada_Tags,
+ RE_DT => Ada_Tags,
+ RE_DT_Predef_Prims_Offset => Ada_Tags,
+ RE_DT_Typeinfo_Ptr_Size => Ada_Tags,
+ RE_Expanded_Name => 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_HT_Link => Ada_Tags,
+ RO_TA_External_Tag => Ada_Tags,
+ RE_Get_Access_Level => Ada_Tags,
+ RE_Get_Entry_Index => Ada_Tags,
+ RE_Get_Offset_Index => Ada_Tags,
+ RE_Get_Prim_Op_Kind => Ada_Tags,
+ RE_Get_Tagged_Kind => Ada_Tags,
+ RE_Idepth => Ada_Tags,
+ RE_Iface_Tag => Ada_Tags,
+ RE_Ifaces_Table => Ada_Tags,
+ RE_Interfaces_Table => Ada_Tags,
+ RE_Interface_Data => Ada_Tags,
+ RE_Interface_Tag => Ada_Tags,
+ RE_IW_Membership => Ada_Tags,
+ RE_Nb_Ifaces => Ada_Tags,
+ RE_No_Dispatch_Table_Wrapper => Ada_Tags,
+ RE_NDT_Prims_Ptr => Ada_Tags,
+ RE_NDT_TSD => Ada_Tags,
+ RE_Num_Prims => Ada_Tags,
+ RE_Object_Specific_Data => Ada_Tags,
+ RE_Offset_To_Top => Ada_Tags,
+ RE_Offset_To_Top_Function_Ptr => Ada_Tags,
+ RE_OSD_Table => Ada_Tags,
+ RE_OSD_Num_Prims => Ada_Tags,
+ RE_POK_Function => Ada_Tags,
+ RE_POK_Procedure => Ada_Tags,
+ RE_POK_Protected_Entry => Ada_Tags,
+ RE_POK_Protected_Function => Ada_Tags,
+ RE_POK_Protected_Procedure => Ada_Tags,
+ RE_POK_Task_Entry => Ada_Tags,
+ RE_POK_Task_Function => Ada_Tags,
+ RE_POK_Task_Procedure => Ada_Tags,
+ RE_Predef_Prims => Ada_Tags,
+ RE_Predef_Prims_Table_Ptr => Ada_Tags,
+ RE_Prim_Op_Kind => Ada_Tags,
+ RE_Prims_Ptr => Ada_Tags,
+ RE_Primary_DT => Ada_Tags,
+ RE_Signature => Ada_Tags,
+ RE_SSD => Ada_Tags,
+ RE_TSD => Ada_Tags,
+ RE_Type_Specific_Data => 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_Transportable => Ada_Tags,
+ RE_RC_Offset => Ada_Tags,
+ RE_Secondary_DT => Ada_Tags,
+ RE_Select_Specific_Data => Ada_Tags,
+ RE_Set_Entry_Index => Ada_Tags,
+ RE_Set_Offset_To_Top => Ada_Tags,
+ RE_Set_Prim_Op_Kind => Ada_Tags,
+ RE_Static_Offset_To_Top => Ada_Tags,
RE_Tag => Ada_Tags,
- RE_Address_Array => Ada_Tags,
-
+ RE_Tag_Error => Ada_Tags,
+ RE_Tag_Kind => Ada_Tags,
+ RE_Tag_Ptr => Ada_Tags,
+ RE_Tag_Table => Ada_Tags,
+ RE_Tags_Table => Ada_Tags,
+ RE_Tagged_Kind => Ada_Tags,
+ RE_Type_Specific_Data_Ptr => Ada_Tags,
+ RE_TK_Abstract_Limited_Tagged => Ada_Tags,
+ RE_TK_Abstract_Tagged => Ada_Tags,
+ RE_TK_Limited_Tagged => Ada_Tags,
+ RE_TK_Protected => Ada_Tags,
+ RE_TK_Tagged => Ada_Tags,
+ RE_TK_Task => Ada_Tags,
+
+ RE_Abort_Task => Ada_Task_Identification,
RE_Current_Task => Ada_Task_Identification,
- RO_AT_Task_ID => Ada_Task_Identification,
+ RO_AT_Task_Id => Ada_Task_Identification,
RO_CA_Time => Ada_Calendar,
RO_CA_Delay_For => Ada_Calendar_Delays,
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_Address_Image => System_Address_Image,
+
RE_Add_With_Ovflo_Check => System_Arith_64,
RE_Double_Divide => System_Arith_64,
RE_Multiply_With_Ovflo_Check => System_Arith_64,
RE_Create_AST_Handler => System_AST_Handling,
+ RE_Assert_Failure => System_Assertions,
RE_Raise_Assert_Failure => System_Assertions,
RE_AST_Handler => System_Aux_DEC,
RE_Checked_Pool => System_Checked_Pools,
- RE_Register_Exception => System_Exception_Table,
+ RE_Vector_Not => System_Boolean_Array_Operations,
+ RE_Vector_And => System_Boolean_Array_Operations,
+ RE_Vector_Or => System_Boolean_Array_Operations,
+ RE_Vector_Nand => System_Boolean_Array_Operations,
+ RE_Vector_Nor => System_Boolean_Array_Operations,
+ RE_Vector_Nxor => System_Boolean_Array_Operations,
+ RE_Vector_Xor => System_Boolean_Array_Operations,
- 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_Compare_Array_S8 => System_Compare_Array_Signed_8,
+ RE_Compare_Array_S8_Unaligned => System_Compare_Array_Signed_8,
- RE_Exn_Integer => System_Exn_Int,
+ RE_Compare_Array_S16 => System_Compare_Array_Signed_16,
- RE_Exn_Long_Float => System_Exn_LFlt,
+ RE_Compare_Array_S32 => System_Compare_Array_Signed_32,
- RE_Exn_Long_Integer => System_Exn_LInt,
+ RE_Compare_Array_S64 => System_Compare_Array_Signed_64,
- RE_Exn_Long_Long_Float => System_Exn_LLF,
+ RE_Compare_Array_U8 => System_Compare_Array_Unsigned_8,
+ RE_Compare_Array_U8_Unaligned => System_Compare_Array_Unsigned_8,
- RE_Exn_Long_Long_Integer => System_Exn_LLI,
+ RE_Compare_Array_U16 => System_Compare_Array_Unsigned_16,
- RE_Exn_Short_Float => System_Exn_SFlt,
+ RE_Compare_Array_U32 => System_Compare_Array_Unsigned_32,
- RE_Exn_Short_Integer => System_Exn_SInt,
+ RE_Compare_Array_U64 => System_Compare_Array_Unsigned_64,
- RE_Exn_Short_Short_Integer => System_Exn_SSI,
+ RE_Get_Active_Partition_Id => System_DSA_Services,
+ RE_Get_Local_Partition_Id => System_DSA_Services,
+ RE_Get_Passive_Partition_Id => System_DSA_Services,
- RE_Exp_Float => System_Exp_Flt,
+ RE_Register_Exception => System_Exception_Table,
- RE_Exp_Integer => System_Exp_Int,
+ RE_Local_Raise => System_Exceptions,
- RE_Exp_Long_Float => System_Exp_LFlt,
+ RE_Exn_Integer => System_Exn_Int,
- RE_Exp_Long_Integer => System_Exp_LInt,
+ RE_Exn_Long_Long_Float => System_Exn_LLF,
- RE_Exp_Long_Long_Float => System_Exp_LLF,
+ RE_Exn_Long_Long_Integer => System_Exn_LLI,
+
+ RE_Exp_Integer => System_Exp_Int,
RE_Exp_Long_Long_Integer => System_Exp_LLI,
RE_Exp_Modular => System_Exp_Mod,
- RE_Exp_Short_Float => System_Exp_SFlt,
+ RE_Exp_Unsigned => System_Exp_Uns,
- RE_Exp_Short_Integer => System_Exp_SInt,
+ RE_Attr_Float => System_Fat_Flt,
- RE_Exp_Short_Short_Integer => System_Exp_SSI,
+ RE_Attr_IEEE_Long => System_Fat_IEEE_Long_Float,
+ RE_Fat_IEEE_Long => System_Fat_IEEE_Long_Float,
- RE_Exp_Unsigned => System_Exp_Uns,
+ RE_Attr_IEEE_Short => System_Fat_IEEE_Short_Float,
+ RE_Fat_IEEE_Short => System_Fat_IEEE_Short_Float,
+
+ RE_Attr_Long_Float => System_Fat_LFlt,
+
+ RE_Attr_Long_Long_Float => System_Fat_LLF,
- RE_Fat_Float => System_Fat_Flt,
+ RE_Attr_Short_Float => System_Fat_SFlt,
- RE_Fat_Long_Float => System_Fat_LFlt,
+ RE_Attr_VAX_D_Float => System_Fat_VAX_D_Float,
+ RE_Fat_VAX_D => System_Fat_VAX_D_Float,
- RE_Fat_Long_Long_Float => System_Fat_LLF,
+ RE_Attr_VAX_F_Float => System_Fat_VAX_F_Float,
+ RE_Fat_VAX_F => System_Fat_VAX_F_Float,
- RE_Fat_Short_Float => System_Fat_SFlt,
+ RE_Attr_VAX_G_Float => System_Fat_VAX_G_Float,
+ RE_Fat_VAX_G => System_Fat_VAX_G_Float,
RE_Attach_To_Final_List => System_Finalization_Implementation,
+ RE_Finalizable_Ptr_Ptr => System_Finalization_Implementation,
+ RE_Move_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_Image_Unsigned => System_Img_Uns,
RE_Image_Wide_Character => System_Img_WChar,
+ RE_Image_Wide_Wide_Character => System_Img_WChar,
RE_Bind_Interrupt_To_Entry => System_Interrupts,
RE_Default_Interrupt_Priority => System_Interrupts,
RE_Install_Handlers => System_Interrupts,
RE_Register_Interrupt_Handler => System_Interrupts,
RE_Static_Interrupt_Protection => System_Interrupts,
+ RE_System_Interrupt_Id => System_Interrupts,
RE_Asm_Insn => System_Machine_Code,
RE_Asm_Input_Operand => System_Machine_Code,
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_DSA_Implementation => 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_RAS_Proxy_Type_Access => 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_Request_Access => System_Partition_Interface,
+ RE_RCI_Locator => System_Partition_Interface,
+ RE_RCI_Subp_Info => System_Partition_Interface,
+ RE_RCI_Subp_Info_Array => System_Partition_Interface,
+ RE_Same_Partition => System_Partition_Interface,
RE_Subprogram_Id => System_Partition_Interface,
+ RE_Get_RAS_Info => System_Partition_Interface,
+
+ RE_To_PolyORB_String => System_Partition_Interface,
+ RE_Caseless_String_Eq => System_Partition_Interface,
+ RE_TypeCode => System_Partition_Interface,
+ RE_Any => System_Partition_Interface,
+ RE_Mode_In => System_Partition_Interface,
+ RE_Mode_Out => System_Partition_Interface,
+ RE_Mode_Inout => System_Partition_Interface,
+ RE_NamedValue => System_Partition_Interface,
+ RE_Result_Name => System_Partition_Interface,
+ RE_Object_Ref => System_Partition_Interface,
+ RE_Create_Any => System_Partition_Interface,
+ RE_Any_Aggregate_Build => System_Partition_Interface,
+ RE_Add_Aggregate_Element => System_Partition_Interface,
+ RE_Get_Aggregate_Element => System_Partition_Interface,
+ RE_Content_Type => System_Partition_Interface,
+ RE_Any_Member_Type => System_Partition_Interface,
+ RE_Get_Nested_Sequence_Length => System_Partition_Interface,
+ RE_Get_Any_Type => System_Partition_Interface,
+ RE_Extract_Union_Value => System_Partition_Interface,
+ RE_NVList_Ref => System_Partition_Interface,
+ RE_NVList_Create => System_Partition_Interface,
+ RE_NVList_Add_Item => System_Partition_Interface,
+ RE_Request_Create => System_Partition_Interface,
+ RE_Request_Invoke => System_Partition_Interface,
+ RE_Request_Arguments => System_Partition_Interface,
+ RE_Request_Set_Out => System_Partition_Interface,
+ RE_Request_Raise_Occurrence => System_Partition_Interface,
+ RE_Nil_Exc_List => System_Partition_Interface,
+ RE_Servant => System_Partition_Interface,
+ RE_Move_Any_Value => System_Partition_Interface,
+ RE_Set_Result => System_Partition_Interface,
+ RE_Register_Obj_Receiving_Stub => System_Partition_Interface,
+ RE_Register_Pkg_Receiving_Stub => System_Partition_Interface,
+ RE_Is_Nil => System_Partition_Interface,
+ RE_Entity_Ptr => System_Partition_Interface,
+ RE_Entity_Of => System_Partition_Interface,
+ RE_Inc_Usage => System_Partition_Interface,
+ RE_Set_Ref => System_Partition_Interface,
+ RE_Make_Ref => System_Partition_Interface,
+ RE_Get_Local_Address => System_Partition_Interface,
+ RE_Get_Reference => System_Partition_Interface,
+ RE_Asynchronous_P_To_Sync_Scope => System_Partition_Interface,
+ RE_Buffer_Stream_Type => System_Partition_Interface,
+ RE_Allocate_Buffer => System_Partition_Interface,
+ RE_Release_Buffer => System_Partition_Interface,
+ RE_BS_To_Any => System_Partition_Interface,
+ RE_Any_To_BS => System_Partition_Interface,
+
+ RE_FA_B => System_Partition_Interface,
+ RE_FA_C => System_Partition_Interface,
+ RE_FA_F => System_Partition_Interface,
+ RE_FA_I => System_Partition_Interface,
+ RE_FA_LF => System_Partition_Interface,
+ RE_FA_LI => System_Partition_Interface,
+ RE_FA_LLF => System_Partition_Interface,
+ RE_FA_LLI => System_Partition_Interface,
+ RE_FA_LLU => System_Partition_Interface,
+ RE_FA_LU => System_Partition_Interface,
+ RE_FA_SF => System_Partition_Interface,
+ RE_FA_SI => System_Partition_Interface,
+ RE_FA_SSI => System_Partition_Interface,
+ RE_FA_SSU => System_Partition_Interface,
+ RE_FA_SU => System_Partition_Interface,
+ RE_FA_U => System_Partition_Interface,
+ RE_FA_WC => System_Partition_Interface,
+ RE_FA_WWC => System_Partition_Interface,
+ RE_FA_String => System_Partition_Interface,
+ RE_FA_ObjRef => System_Partition_Interface,
+
+ RE_TA_A => System_Partition_Interface,
+ RE_TA_B => System_Partition_Interface,
+ RE_TA_C => System_Partition_Interface,
+ RE_TA_F => System_Partition_Interface,
+ RE_TA_I => System_Partition_Interface,
+ RE_TA_LF => System_Partition_Interface,
+ RE_TA_LI => System_Partition_Interface,
+ RE_TA_LLF => System_Partition_Interface,
+ RE_TA_LLI => System_Partition_Interface,
+ RE_TA_LLU => System_Partition_Interface,
+ RE_TA_LU => System_Partition_Interface,
+ RE_TA_SF => System_Partition_Interface,
+ RE_TA_SI => System_Partition_Interface,
+ RE_TA_SSI => System_Partition_Interface,
+ RE_TA_SSU => System_Partition_Interface,
+ RE_TA_SU => System_Partition_Interface,
+ RE_TA_U => System_Partition_Interface,
+ RE_TA_WC => System_Partition_Interface,
+ RE_TA_WWC => System_Partition_Interface,
+ RE_TA_String => System_Partition_Interface,
+ RE_TA_ObjRef => System_Partition_Interface,
+ RE_TA_TC => System_Partition_Interface,
+
+ RE_TC_Alias => System_Partition_Interface,
+ RE_TC_Build => System_Partition_Interface,
+ RE_Get_TC => System_Partition_Interface,
+ RE_Set_TC => System_Partition_Interface,
+ RE_TC_Any => System_Partition_Interface,
+ RE_TC_B => System_Partition_Interface,
+ RE_TC_C => System_Partition_Interface,
+ RE_TC_F => System_Partition_Interface,
+ RE_TC_I => System_Partition_Interface,
+ RE_TC_LF => System_Partition_Interface,
+ RE_TC_LI => System_Partition_Interface,
+ RE_TC_LLF => System_Partition_Interface,
+ RE_TC_LLI => System_Partition_Interface,
+ RE_TC_LLU => System_Partition_Interface,
+ RE_TC_LU => System_Partition_Interface,
+ RE_TC_SF => System_Partition_Interface,
+ RE_TC_SI => System_Partition_Interface,
+ RE_TC_SSI => System_Partition_Interface,
+ RE_TC_SSU => System_Partition_Interface,
+ RE_TC_SU => System_Partition_Interface,
+ RE_TC_U => System_Partition_Interface,
+ RE_TC_Void => System_Partition_Interface,
+ RE_TC_Opaque => System_Partition_Interface,
+ RE_TC_WC => System_Partition_Interface,
+ RE_TC_WWC => System_Partition_Interface,
+ RE_TC_Array => System_Partition_Interface,
+ RE_TC_Sequence => System_Partition_Interface,
+ RE_TC_String => System_Partition_Interface,
+ RE_TC_Struct => System_Partition_Interface,
+ RE_TC_Union => System_Partition_Interface,
+ RE_TC_Object => 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_Iu2 => System_Scalar_Values,
RE_IS_Iu4 => System_Scalar_Values,
RE_IS_Iu8 => System_Scalar_Values,
+ RE_IS_Iz1 => System_Scalar_Values,
+ RE_IS_Iz2 => System_Scalar_Values,
+ RE_IS_Iz4 => System_Scalar_Values,
+ RE_IS_Iz8 => 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_Default_Secondary_Stack_Size => System_Secondary_Stack,
RE_Mark_Id => System_Secondary_Stack,
RE_SS_Allocate => System_Secondary_Stack,
RE_SS_Mark => System_Secondary_Stack,
RE_Shared_Var_WOpen => System_Shared_Storage,
RE_Abort_Undefer_Direct => System_Standard_Library,
+ RE_Exception_Code => 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_Dummy_Communication_Block => System_Storage_Elements,
RE_Root_Storage_Pool => System_Storage_Pools,
-
- RE_Thin_Pointer => System_Stream_Attributes,
- RE_Fat_Pointer => System_Stream_Attributes,
+ RE_Allocate_Any => System_Storage_Pools,
+ RE_Deallocate_Any => System_Storage_Pools,
RE_I_AD => System_Stream_Attributes,
RE_I_AS => System_Stream_Attributes,
RE_I_SU => System_Stream_Attributes,
RE_I_U => System_Stream_Attributes,
RE_I_WC => System_Stream_Attributes,
+ RE_I_WWC => System_Stream_Attributes,
RE_W_AD => System_Stream_Attributes,
RE_W_AS => System_Stream_Attributes,
RE_W_SU => System_Stream_Attributes,
RE_W_U => System_Stream_Attributes,
RE_W_WC => System_Stream_Attributes,
+ RE_W_WWC => 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_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,
+ RO_ST_Task_Id => System_Tasking,
+ RO_ST_Null_Task => 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_Ada_Task_Control_Block => 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_Unspecified_Priority => System_Tasking,
RE_Activation_Chain => System_Tasking,
+ RE_Activation_Chain_Access => System_Tasking,
+ RE_Storage_Size => System_Tasking,
RE_Abort_Defer => System_Soft_Links,
RE_Abort_Undefer => System_Soft_Links,
RE_Bits_2 => System_Unsigned_Types,
RE_Bits_4 => System_Unsigned_Types,
RE_Float_Unsigned => System_Unsigned_Types,
+ RE_Long_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_Short_Unsigned => System_Unsigned_Types,
+ RE_Short_Short_Unsigned => System_Unsigned_Types,
RE_Unsigned => System_Unsigned_Types,
RE_Value_Boolean => System_Val_Bool,
RE_Value_Unsigned => System_Val_Uns,
RE_Value_Wide_Character => System_Val_WChar,
+ RE_Value_Wide_Wide_Character => System_Val_WChar,
RE_D => System_Vax_Float_Operations,
RE_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_Ne_F => System_Vax_Float_Operations,
+ RE_Ne_G => System_Vax_Float_Operations,
+
+ RE_Valid_D => System_Vax_Float_Operations,
+ RE_Valid_F => System_Vax_Float_Operations,
+ RE_Valid_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_String_To_Wide_Wide_String => System_WCh_StW,
RE_Wide_String_To_String => System_WCh_WtS,
+ RE_Wide_Wide_String_To_String => System_WCh_WtS,
+ RE_Wide_Wide_Width_Character => System_WWd_Char,
RE_Wide_Width_Character => System_WWd_Char,
+ RE_Wide_Wide_Width_Enumeration_8 => System_WWd_Enum,
+ RE_Wide_Wide_Width_Enumeration_16 => System_WWd_Enum,
+ RE_Wide_Wide_Width_Enumeration_32 => System_WWd_Enum,
+
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_Wide_Width_Wide_Character => System_WWd_Wchar,
+ RE_Wide_Wide_Width_Wide_Wide_Char => System_WWd_Wchar,
+
RE_Wide_Width_Wide_Character => System_WWd_Wchar,
+ RE_Wide_Width_Wide_Wide_Character => System_WWd_Wchar,
RE_Width_Boolean => System_Wid_Bool,
RE_Width_Long_Long_Unsigned => System_Wid_LLU,
RE_Width_Wide_Character => System_Wid_WChar,
+ RE_Width_Wide_Wide_Character => System_Wid_WChar,
RE_Protected_Entry_Body_Array =>
System_Tasking_Protected_Objects_Entries,
System_Tasking_Protected_Objects_Entries,
RE_Lock_Entries =>
System_Tasking_Protected_Objects_Entries,
- RE_Lock_Read_Only_Entries =>
+ RO_PE_Get_Ceiling =>
+ System_Tasking_Protected_Objects_Entries,
+ RO_PE_Set_Ceiling =>
System_Tasking_Protected_Objects_Entries,
RE_Unlock_Entries =>
System_Tasking_Protected_Objects_Entries,
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 =>
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_Get_Ceiling => System_Tasking_Protected_Objects,
+ RE_Set_Ceiling => System_Tasking_Protected_Objects,
RE_Unlock => System_Tasking_Protected_Objects,
RE_Delay_Block => System_Tasking_Async_Delays,
RE_Complete_Task => System_Tasking_Stages,
RE_Free_Task => System_Tasking_Stages,
RE_Expunge_Unactivated_Tasks => System_Tasking_Stages,
+ RE_Move_Activation_Chain => System_Tasking_Stages,
RE_Terminated => System_Tasking_Stages);
+ --------------------------------
+ -- Configurable Run-Time Mode --
+ --------------------------------
+
+ -- Part of the job of Rtsfind is to enforce run-time restrictions in
+ -- configurable run-time mode. This is done by monitoring implicit access
+ -- to the run time library requested by calls to the RTE function. A call
+ -- may be invalid in configurable run-time mode for either of the
+ -- following two reasons:
+
+ -- 1. File in which entity lives is not present in run-time library
+ -- 2. File is present, but entity is not defined in the file
+
+ -- In normal mode, either or these two situations is a fatal error
+ -- that indicates that the run-time library is incorrectly configured,
+ -- and a fatal error message is issued to signal this error.
+
+ -- In configurable run-time mode, either of these two situations indicates
+ -- simply that the corresponding operation is not available in the current
+ -- run-time that is use. This is not a configuration error, but rather a
+ -- natural result of a limited run-time. This situation is signalled by
+ -- raising the exception RE_Not_Available. The caller must respond to
+ -- this exception by posting an appropriate error message.
+
+ ----------------------
+ -- No_Run_Time_Mode --
+ ----------------------
+
+ -- For backwards compatibility with previous versions of GNAT, the
+ -- compiler recognizes the pragma No_Run_Time. This provides a special
+ -- version of configurable run-time mode that operates with the standard
+ -- run-time library, but allows only a subset of entities to be
+ -- accessed. If any other entity is accessed, then it is treated
+ -- as a configurable run-time violation, and the exception
+ -- RE_Not_Availble is raised.
+
+ -- The following array defines the set of units that contain entities
+ -- that can be referenced in No_Run_Time mode. For each of these units,
+ -- all entities defined in the unit can be used in this mode.
+
+ OK_No_Run_Time_Unit : constant array (RTU_Id) of Boolean :=
+ (Ada_Exceptions => True,
+ Ada_Tags => True,
+ Interfaces => True,
+ System => True,
+ System_Parameters => True,
+ System_Fat_Flt => True,
+ System_Fat_LFlt => True,
+ System_Fat_LLF => True,
+ System_Fat_SFlt => True,
+ System_Machine_Code => True,
+ System_Secondary_Stack => True,
+ System_Storage_Elements => True,
+ System_Task_Info => True,
+ System_Unsigned_Types => True,
+ others => False);
+
-----------------
-- Subprograms --
-----------------
+ RE_Not_Available : exception;
+ -- Raised by RTE if the requested entity is not available. This can
+ -- occur either because the file in which the entity should be found
+ -- does not exist, or because the entity is not present in the file.
+
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
-- immediately, since obviously Ent cannot be the entity in question if the
-- corresponding unit has not been loaded.
+ function Is_RTU (Ent : Entity_Id; U : RTU_Id) return Boolean;
+ pragma Inline (Is_RTU);
+ -- This function determines if the given entity corresponds to the entity
+ -- for the unit referenced by U. If this unit has not been loaded, the
+ -- answer will always be False. If the unit has been loaded, then the
+ -- entity id values are compared and True is returned if Ent is the
+ -- entity for this unit.
+
+ 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 or
+ -- Wide_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.
+
+ 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. For
+ -- efficiency reasons, this routine restricts the search to the package
+ -- entity chain.
+ --
+ -- Note: In the case of a package, RTE can return either an entity that is
+ -- declared at the top level of the package, or the package entity itself.
+ -- If an entity within the package has the same simple name as the package,
+ -- then the entity within the package is returned.
+ --
+ -- If RTE returns, the returned value is the required entity
+ --
+ -- If the entity is not available, then an error message is given. The
+ -- form of the message depends on whether we are in configurable run time
+ -- mode or not. In configurable run time mode, a missing entity is not
+ -- that surprising and merely says that the particular construct is not
+ -- supported by the run-time in use. If we are not in configurable run
+ -- time mode, a missing entity is some kind of run-time configuration
+ -- error. In either case, the result of the call is to raise the exception
+ -- RE_Not_Available, which should terminate the expansion of the current
+ -- construct.
+
+ function RTE_Available (E : RE_Id) return Boolean;
+ -- Returns true if a call to RTE will succeed without raising an exception
+ -- and without generating an error message, i.e. if the call will obtain
+ -- the desired entity without any problems.
+
+ function RTE_Record_Component (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. For
+ -- efficiency reasons, this routine restricts the search of E to fields
+ -- of record type declarations found in the package entity chain.
+ --
+ -- Note: In the case of a package, RTE can return either an entity that is
+ -- declared at the top level of the package, or the package entity itself.
+ -- If an entity within the package has the same simple name as the package,
+ -- then the entity within the package is returned.
+ --
+ -- If RTE returns, the returned value is the required entity
+ --
+ -- If the entity is not available, then an error message is given. The
+ -- form of the message depends on whether we are in configurable run time
+ -- mode or not. In configurable run time mode, a missing entity is not
+ -- that surprising and merely says that the particular construct is not
+ -- supported by the run-time in use. If we are not in configurable run
+ -- time mode, a missing entity is some kind of run-time configuration
+ -- error. In either case, the result of the call is to raise the exception
+ -- RE_Not_Available, which should terminate the expansion of the current
+ -- construct.
+
+ function RTE_Record_Component_Available (E : RE_Id) return Boolean;
+ -- Returns true if a call to RTE_Record_Component will succeed without
+ -- raising an exception and without generating an error message, i.e.
+ -- if the call will obtain the desired entity without any problems.
+
+ function RTU_Entity (U : RTU_Id) return Entity_Id;
+ pragma Inline (RTU_Entity);
+ -- This function returns the entity for the unit referenced by U. If
+ -- this unit has not been loaded, it returns Empty.
+
+ function RTU_Loaded (U : RTU_Id) return Boolean;
+ pragma Inline (RTU_Loaded);
+ -- Returns true if indicated unit has already been successfully loaded.
+ -- If the unit has not been loaded, returns False. Note that this does
+ -- not mean that an attempt to load it subsequently would fail.
+
+ procedure Set_RTU_Loaded (N : Node_Id);
+ -- Register the predefined unit N as already 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
-- 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.
+ -- is not necessary, but that doesn't matter. Wide_[Wide_]Text_IO is
+ -- handled in a similar manner.
end Rtsfind;
OSDN Git Service
