Specification of package Corba.Repository_Root.Irobject

 ==================================================== --
 ===  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_Ios ;
with Corba.Object ;
pragma Elaborate_All (Corba.Object) ;
package CORBA.Repository_Root.IRObject is

   type Ref is new Corba.Object.Ref with null record;


   ------------------------------
    Methods of this interface  --
   ------------------------------

   function Get_def_kind
      (Self : in Ref)
      return CORBA.DefinitionKind ;

   procedure destroy
      (Self : in Ref) ;

   Null_Ref : constant Ref := (Corba.Object.Null_Ref with null record);

   Tgx_Service_Name : Corba.ObjectId := Corba.To_Corba_String
      ("InterfaceRepository") ;

   IRObject_R_Id : constant Corba.RepositoryId :=
      Corba.To_Corba_String ("IDL:omg.org/CORBA/IRObject:1.0") ;
private
    Collocated calls profiles and callers

   type Tgx_Get_def_kind_Ptr is access function
      (Self : in Ref)
      return CORBA.DefinitionKind;

   Tgx_Get_def_kind_Caller : Tgx_Get_def_kind_Ptr ;

   type Tgx_destroy_Ptr is access procedure
      (Self : in Ref);

   Tgx_destroy_Caller : Tgx_destroy_Ptr ;
end CORBA.Repository_Root.IRObject;

List of definition uses