Specification of generic package Corba.Value.Forward

 ========================================================================= --
 ===                                                                   === --
 ===                 Top Graph'X CORBA Implementation                  === --
 ===                                                                   === --
 ===                 Copyright (c) 2000, 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.    === --
 ===                                                                   === --
 ========================================================================= --
generic
package Corba.Value.Forward is
   type Value_Ref is new Corba.Value.Base with null record;

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

   Null_Ref : constant Value_Ref := (Corba.Value.Base with null record);

   generic
      type Ref_Type is new CORBA.Value.Base with private;
   package Convert is
      function From_Forward (The_Forward : in Value_Ref) return Ref_Type;
      function To_Ref (The_Forward : in Value_Ref) return Ref_Type
         renames From_Forward;
      function To_Forward (The_Ref : in Ref_Type) return Value_Ref;
   end Convert;

   TGX: needed for correct reading
   procedure Set_Default_Reader ( Default : in Value_Reader) ;
end Corba.Value.Forward;

List of definition uses