1. --  (c) Copyright, Real-Time Innovations, $Date:: 2012-02-16 #$ 
  2. --  All rights reserved. 
  3. -- 
  4. --  No duplications, whole or partial, manual or electronic, may be made 
  5. --  without express written permission.  Any such copies, or 
  6. --  revisions thereof, must display this notice unaltered. 
  7. --  This code contains trade secrets of Real-Time Innovations, Inc. 
  8.  
  9. pragma Ada_05; 
  10. with DDS.TopicDescription; 
  11.  
  12. --  <dref>MultiTopic</dref> 
  13. package DDS.MultiTopic is 
  14.  
  15.    type Ref is limited interface and DDS.TopicDescription.Ref; 
  16.    type Ref_Access is access all Ref'Class; 
  17.  
  18.    function get_subscription_expression 
  19.      (Self : not null access Ref) 
  20.      return DDS.String is abstract; 
  21.    --  <dref>MultiTopic_get_subscription_expression</dref> 
  22.  
  23.  
  24. --     function get_expression_parameters 
  25. --       (Self : not null access Ref) 
  26. --       return DDS.StringSeq; 
  27. -- 
  28. -- 
  29. --     procedure set_expression_parameters 
  30. --       (Self : not null access Ref; 
  31. --        expression_parameters : in DDS.StringSeq); 
  32.  
  33.  
  34. end DDS.MultiTopic;