Specification of package Cosnaming.Namingcontext.Helper

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2005            === --
 ==================================================== --
 From IDL file /home/Jean/CVS/OrbAda/Idl/Idl/CosNaming.idl
with Corba.Object.Ref_To_Any_Conversion ;
package CosNaming.NamingContext.Helper is

   Tc_NamingContext : constant Corba.Typecode.Object :=
      Corba.Typecode.Convert_To_Tc
       (( 14, 0, 0, 0, 66, 0, 0, 0, 1, 0, 0, 0, 40, 0, 0, 0, 73, 68, 76, 58,
          111, 109, 103, 46, 111, 114, 103, 47, 67, 111, 115, 78, 97, 109,
          105, 110, 103, 47, 78, 97, 109, 105, 110, 103, 67, 111, 110, 116,
          101, 120, 116, 58, 49, 46, 48, 0, 14, 0, 0, 0, 78, 97, 109, 105,
          110, 103, 67, 111, 110, 116, 101, 120, 116, 0));

   package NamingContext_To_Any
      is new Corba.Object.Ref_To_Any_Conversion
      (Ref => NamingContext.Ref,
       Code => Tc_NamingContext) ;

   function To_Any (From : in Ref) return Corba.Any renames
      NamingContext_To_Any.Ref_To_Any ;

   function To_Ref (From : in Corba.Any) return Ref renames
      NamingContext_To_Any.Any_To_Ref ;

   function To_NamingContext (Self : in Corba.Object.Ref'class) return Ref ;

   function Tc_NotFoundReason return Corba.Typecode.Object ;
end CosNaming.NamingContext.Helper;

List of definition uses