Specification of package Messaging.Exceptionholder.Impl

 ==================================================== --
 ===  Code automatically generated by IDL to Ada  === --
 ===  compiler OrbAda-idl2ada                     === --
 ===  Copyright Top Graph'X  1997-2001            === --
 ==================================================== --
 From IDL file except.idl
with Corba.Iop ;
with Corba.Impl ;
package Messaging.ExceptionHolder.Impl is
   type Object is new Corba.Value.Impl_Base with
   record
      is_system_exception : Corba.Boolean;
      byte_order : Corba.Boolean;
      marshaled_exception : marshaled_exception_Sequence;
   end record;

   type Object_Ptr is access all Object'class;

   -----------------------------
    Methods of this valuetype --
   -----------------------------

   procedure raise_exception
      ( Self : access Object) ;

   ---------------------
    Intrinsic Methods --
   ---------------------

    Implementation Allocator
   function Tgx_Allocate return Object_Ptr ;

   function Is_A
      (Self : access Object ;
       Id   : in Corba.RepositoryId ) return Boolean ;

   function Get_RepositoryId
      (Self : access Object) return Corba.RepositoryId ;
end Messaging.ExceptionHolder.Impl;

List of definition uses