Specification of package Corba.Object.Reference

 ========================================================================= --
 ===                                                                   === --
 ===                 Top Graph'X CORBA Implementation                  === --
 ===                                                                   === --
 ===                 Copyright (c) 1996, Top Graph'X.                  === --
 ===                                                                   === --
 ===                     --- Copyright Notice ---                      === --
 ===                                                                   === --
 ===    This software is protected as an unpublished work under the    === --
 ===     Copyright Act of 1976.  All rights reserved.  Top Graph'X.    === --
 ===                                                                   === --
 ========================================================================= --

with Corba.Impl ;
package Corba.Object.Reference is

   procedure Create ( Object  : in Corba.Impl.Object_Ptr ;
                      Local   : in Corba.Iop.Local_Ref ;
                      Ior     : in Corba_Ios.Stream_Data ;
                      Remote  : in Corba.Iop.Remote_Info ;
                      Result  : in out Ref'class) ;

   function Service_Id (Self : in Ref'class) return Service_Identity ;

   function Object_Id (Self : in Ref'class) return Object_Identity ;

   function Orb_Id (Self : in Ref'class) return Orb_Identity ;

   function Local (Self : in Ref'class) return Corba.Iop.Local_Ref ;

   function Remote (Self : in Ref'class) return Corba.Iop.Remote_Info ;

   function Serial (Self : in Ref'class) return Corba.Unsigned_Short ;

   procedure Write_Object_Key
      ( Self   : in Ref'class ;
        Stream : access Corba_Ios.Iop_Stream_Type ) ;

   procedure Write_Type_Id
      ( Self   : in Ref'class ;
        Buffer : in out Corba_Ios.Stream_Element_Array ;
        Last   : in out Corba_Ios.Stream_Element_Count ) ;

   function Ior_Data (Self : in Ref'class)
      return Corba_Ios.Stream_Element_Array ;

   function Ior_Data (Self : in Ref'class)
      return Corba_Ios.Stream_Data ;

   function Key_Length (Self : in Ref'class)
      return Corba_Ios.Stream_Element_Count ;

   function Type_Id_Length (Self : in Ref'class)
      return Corba_Ios.Stream_Element_Count ;

end Corba.Object.Reference ;