Specification of package Rtcorba.Current

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2001            === --
 ==================================================== --
 From IDL file RTCORBA.idl
with Corba_Ios ;
with Corba.Abstractbase ;
with Corba.Current ;
with Corba.Object ;
package RTCORBA.Current is

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


   -------------------------------------------------
    Methods inherited from CORBA.Current
   -------------------------------------------------

   ---------------------------------------
    Types and methods of this interface --
   ---------------------------------------

   function Get_the_priority
      (Self : in Ref)
      return RTCORBA.Priority ;

   procedure Set_the_priority
      (Self : in Ref;
       To : in RTCORBA.Priority) ;

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

   Current_R_Id : constant Corba.RepositoryId :=
      Corba.To_Unbounded_String ("IDL:omg.org/RTCORBA/Current:1.0") ;
end RTCORBA.Current;

List of definition uses