Specification of package Cosnaming.Bindingiterator

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2005            === --
 ==================================================== --
 From IDL file /home/Jean/CVS/OrbAda/Idl/Idl/CosNaming.idl
with Corba_Ios ;
with Corba.Object ;
with Bindingiterator_Forward ;
pragma Elaborate_All (Corba.Object) ;
package CosNaming.BindingIterator is

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


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

   procedure next_one
      (Self : in Ref;
       b : out CosNaming.Binding;
       Returns : out Corba.Boolean) ;

   procedure next_n
      (Self : in Ref;
       how_many : in Corba.Unsigned_Long;
       bl : out CosNaming.BindingList;
       Returns : out Corba.Boolean) ;

   procedure destroy
      (Self : in Ref) ;

   package Convert is new BindingIterator_Forward.Convert (Ref);

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

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

   BindingIterator_R_Id : constant Corba.RepositoryId :=
      Corba.To_Corba_String ("IDL:omg.org/CosNaming/BindingIterator:1.0") ;
private
    Collocated calls profiles and callers

   type Tgx_next_one_Ptr is access procedure
      (Self : in Ref;
       b : out CosNaming.Binding;
       Returns : out Corba.Boolean);

   Tgx_next_one_Caller : Tgx_next_one_Ptr ;

   type Tgx_next_n_Ptr is access procedure
      (Self : in Ref;
       how_many : in Corba.Unsigned_Long;
       bl : out CosNaming.BindingList;
       Returns : out Corba.Boolean);

   Tgx_next_n_Caller : Tgx_next_n_Ptr ;

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

   Tgx_destroy_Caller : Tgx_destroy_Ptr ;
end CosNaming.BindingIterator;

List of definition uses