pragma Ada_2012;
-- (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.
with DDS.Listener;
limited with DDS.Topic;
-- <dref>TopicListener</dref>
package DDS.TopicListener is
type Ref is limited interface and DDS.Listener.Ref;
type Ref_Access is access all Ref'Class;
procedure On_Inconsistent_Topic
(Self : not null access Ref;
Topic : access constant DDS.Topic.Ref'Class;
Status : in DDS.InconsistentTopicStatus) is null;
-- <dref>TopicListener_on_inconsistent_topic</dref>
end DDS.TopicListener;