Specification of generic package Corba.Forward

 ========================================================================= --
 ===                                                                   === --
 ===                 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.Object;
pragma Elaborate_All (Corba.Object) ;
generic
package Corba.Forward is
   type Ref is new Corba.Object.Ref with null record;

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

   generic
      type Ref_Type is new Corba.Object.Ref with private;
   package Convert is
      function From_Forward (The_Forward : in Ref) return Ref_Type;
      function To_Ref (The_Forward : in Ref) return Ref_Type
         renames From_Forward;
      function To_Forward (The_Ref : in Ref_Type) return Ref;
   end Convert;
end Corba.Forward;

List of definition uses