-- (c) Copyright, Real-Time Innovations, $Date:: 2012-02-16 #$ -- All rights reserved. -- -- No duplications, whole or partial, manual or electronic, may be made -- without express written permission. Any such copies, or -- revisions thereof, must display this notice unaltered. -- This code contains trade secrets of Real-Time Innovations, Inc. pragma Ada_05; with RTIDDS.Obj_Impl; with DDS.Condition; package DDS.Condition_Impl is
type Ref is abstract limited new RTIDDS.Obj_Impl.Ref and DDS.Condition.Ref with null record;
type Ref_Access is access all Ref'Class;
end DDS.Condition_Impl;