subtype Address is System.Address;
type Unsigned_Long_Long is new Interfaces.Unsigned_64;
type Short_Ptr is access all short;
type Long_Ptr is access all long;
type Long_Long_Ptr is access all Long_Long;
type Unsigned_Short_Ptr is access all unsigned_short;
type Unsigned_Long_Ptr is access all unsigned_long;
type Unsigned_Long_Long_Ptr is access all Unsigned_Long_Long;
type Float_Ptr is access all Float;
type Double_Ptr is access all Double;
type Long_Double_Ptr is access all Long_Double;
type Char_Ptr is access all Char;
type Wchar_Ptr is access all Wchar;
type Octet_Ptr is access all Octet;
type Boolean_Ptr is access all Boolean;
type String_Ptr is access all String;
type Wide_String_Ptr is access all Wide_String;
type Bool is new Boolean;
RTI_BOOL_TRUE : constant Bool := True;
RTI_BOOL_FALSE : constant Bool := False;
procedure Deallocate is new Ada.Unchecked_Deallocation
( | unsigned_short, Unsigned_Short_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | unsigned_long, Unsigned_Long_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | Unsigned_Long_Long, Unsigned_Long_Long_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | Double, Double_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | Long_Double, Long_Double_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | Boolean, Boolean_Ptr); |
procedure Deallocate is new Ada.Unchecked_Deallocation
( | Wide_String, Wide_String_Ptr); |
function Trimmed_Image
( | X | : Long_Long) return Standard.String; |
function Trimmed_Image
( | X | : Unsigned_Long_Long) return Standard.String; |
function To_Rtidds_String
( | Source | : Standard.String) return String; |
function To_Standard_String
( | Source | : String) return Standard.String; |
function To_Rtidds_Wide_String
( | Source | : Standard.Wide_String) return Wide_String; |
function To_Standard_Wide_String
( | Source | : Wide_String) return Standard.Wide_String; |