Specification of package Corba.Repository_Root.Constantdef.Helper

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2005            === --
 ==================================================== --
 From IDL file ../omg/CORBA_InterfaceRepository.idl
with Corba.Object.Ref_To_Any_Conversion ;
package CORBA.Repository_Root.ConstantDef.Helper is

   Tc_ConstantDef : constant Corba.Typecode.Object :=
      Corba.Typecode.Convert_To_Tc
       (( 14, 0, 0, 0, 60, 0, 0, 0, 1, 0, 0, 0, 34, 0, 0, 0, 73, 68, 76, 58,
          111, 109, 103, 46, 111, 114, 103, 47, 67, 79, 82, 66, 65, 47, 67,
          111, 110, 115, 116, 97, 110, 116, 68, 101, 102, 58, 49, 46, 48, 0, 0,
          0, 12, 0, 0, 0, 67, 111, 110, 115, 116, 97, 110, 116, 68, 101, 102, 0
         ));

   package ConstantDef_To_Any
      is new Corba.Object.Ref_To_Any_Conversion
      (Ref => ConstantDef.Ref,
       Code => Tc_ConstantDef) ;

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

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

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

end CORBA.Repository_Root.ConstantDef.Helper;

List of definition uses