Specification of package Corba.Implementation_Repository.Helper
==================================================== --
=== Code automatically generated by IDL to Ada === --
=== compiler OrbAda-idl2ada === --
=== Copyright Top Graph'X 1997-2000 === --
==================================================== --
with Corba.Object.Ref_To_Any_Conversion ;
package CORBA.Implementation_Repository.Helper is
Tc_Implementation_Repository : constant Corba.Typecode.Object :=
Corba.Typecode.Convert_To_Tc
(( 14, 0, 0, 0, 78, 0, 0, 0, 1, 0, 0, 0, 40, 0, 0, 0, 73, 68, 76, 58,
67, 79, 82, 66, 65, 47, 73, 109, 112, 108, 101, 109, 101, 110, 116,
97, 116, 105, 111, 110, 95, 82, 101, 112, 111, 115, 105, 116, 111,
114, 121, 58, 49, 46, 48, 0, 26, 0, 0, 0, 73, 109, 112, 108, 101,
109, 101, 110, 116, 97, 116, 105, 111, 110, 95, 82, 101, 112, 111,
115, 105, 116, 111, 114, 121, 0));
package Implementation_Repository_To_Any is new Corba.Object.
Ref_To_Any_Conversion
(Ref => Implementation_Repository
.Ref, Code => Tc_Implementation_Repository) ;
function To_Any (From : in Ref) return Corba.Any renames
Implementation_Repository_To_Any.Ref_To_Any ;
function To_Ref (From : in Corba.Any) return Ref renames
Implementation_Repository_To_Any.Any_To_Ref ;
function To_Implementation_Repository (Self : in Corba.Object.Ref'class)
return Ref ;
Tc_Implementations : constant Corba.Typecode.Object :=
Corba.Typecode.Convert_to_Tc
(( 19, 0, 0, 0, 80, 0, 0, 0, 1, 79, 82, 66, 14, 0, 0, 0, 62, 0, 0, 0, 1,
79, 82, 66, 32, 0, 0, 0, 73, 68, 76, 58, 67, 79, 82, 66, 65, 47, 73,
109, 112, 108, 101, 109, 101, 110, 116, 97, 116, 105, 111, 110, 68,
101, 102, 58, 49, 46, 48, 0, 18, 0, 0, 0, 73, 109, 112, 108, 101,
109, 101, 110, 116, 97, 116, 105, 111, 110, 68, 101, 102, 0, 111,
114, 0, 0, 0, 0));
end CORBA.Implementation_Repository.Helper;
List of definition uses
This page was generated by PrismTech's ada2html on Friday Mai 12 2006 16:18