pragma Style_Checks ("NM32766");
pragma Wide_Character_Encoding (Brackets);

---------------------------------------------------
--  This file has been generated automatically from
--  /work/a/ports/net/polyorb/work/polyorb-2.9.0/idls/cos/event/CosEventChannelAdmin.idl
--  by IAC (IDL to Ada Compiler) 2.9.0 (rev. unknown).
---------------------------------------------------
--  NOTE: If you modify this file by hand, your
--  changes will be lost when you re-run the
--  IDL to Ada compiler.
---------------------------------------------------

with CosEventComm;
with CosEventComm.PullSupplier;
with PolyORB.Std;
with CosEventComm.PullConsumer;
with CORBA;
pragma Elaborate_All (CORBA);

package CosEventChannelAdmin.ProxyPullSupplier is

   type Ref is
     new CosEventComm.PullSupplier.Ref with null record;

   Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosEventChannelAdmin/ProxyPullSupplier:1.0";

   procedure connect_pull_consumer
     (Self : Ref;
      pull_consumer : CosEventComm.PullConsumer.Ref);

   connect_pull_consumer_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosEventChannelAdmin/ProxyPullSupplier/connect_pull_consumer:1.0";

   function Is_A
     (Self : Ref;
      Logical_Type_Id : PolyORB.Std.String)
     return CORBA.Boolean;

private
   function Is_A
     (Logical_Type_Id : PolyORB.Std.String)
     return CORBA.Boolean;

end CosEventChannelAdmin.ProxyPullSupplier;
