Specification of package Corba.Pollableset

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2001            === --
 ==================================================== --
 From IDL file Messaging.idl
with Corba_Ios ;
with Corba.Abstractbase ;
with Ada.Exceptions ;
 with Corba.Diipollable ;
with Corba.Pollable ;
with Pollableset_Forward ;
package CORBA.PollableSet is

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


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

   NoPossiblePollable : exception;
   type NoPossiblePollable_Members is new Corba.Idl_Exception_Members with
      null record;

   NoPossiblePollable_Id : constant Corba.RepositoryId := Corba.
      To_Unbounded_String
   ("IDL:omg.org/CORBA/PollableSet/NoPossiblePollable:1.0") ;

   procedure Get_Members (X  : in Ada.Exceptions.Exception_Occurrence ;
                          To : out NoPossiblePollable_Members) ;

   procedure Iop_Read
      ( Stream : access Corba_Ios.Iop_Stream_Type ;
        Item   : out NoPossiblePollable_Members) ;

   procedure Iop_Write
      ( Stream : access Corba_Ios.Iop_Stream_Type ;
        Item   : in NoPossiblePollable_Members) ;

   UnknownPollable : exception;
   type UnknownPollable_Members is new Corba.Idl_Exception_Members with null
      record;

   UnknownPollable_Id : constant Corba.RepositoryId := Corba.To_Unbounded_String
   ("IDL:omg.org/CORBA/PollableSet/UnknownPollable:1.0") ;

   procedure Get_Members (X  : in Ada.Exceptions.Exception_Occurrence ;
                          To : out UnknownPollable_Members) ;

   procedure Iop_Read
      ( Stream : access Corba_Ios.Iop_Stream_Type ;
        Item   : out UnknownPollable_Members) ;

   procedure Iop_Write
      ( Stream : access Corba_Ios.Iop_Stream_Type ;
        Item   : in UnknownPollable_Members) ;

    function create_dii_pollable
       ( Self : in Ref)
       return CORBA.DIIPollable.Value_Ref ;

   procedure add_pollable
      ( Self : in Ref;
        potential : in CORBA.Pollable.Value_Ref) ;

   function get_ready_pollable
      ( Self : in Ref;
        timeout : in Corba.Unsigned_Long)
      return CORBA.Pollable.Value_Ref ;

   procedure remove
      ( Self : in Ref;
        potential : in CORBA.Pollable.Value_Ref) ;

   function number_left
      ( Self : in Ref)
      return Corba.Unsigned_Short ;

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

   PollableSet_R_Id : constant Corba.RepositoryId :=
      Corba.To_Unbounded_String ("IDL:omg.org/CORBA/PollableSet:1.0") ;
end CORBA.PollableSet;