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.  
  11. with DDS.Condition; 
  12. limited with DDS.DataReader; 
  13.  
  14. --  <dref>ReadCondition</dref> 
  15. package DDS.ReadCondition is 
  16.  
  17.    type Ref is limited interface and DDS.Condition.Ref; 
  18.    type Ref_Access is access all Ref'Class; 
  19.  
  20.    function Get_Sample_State_Mask 
  21.      (Self : not null access Ref) 
  22.      return DDS.SampleStateMask is abstract; 
  23.    --  <dref>ReadCondition_get_sample_state_mask</dref> 
  24.  
  25.    function Get_View_State_Mask 
  26.      (Self : not null access Ref) 
  27.      return DDS.ViewStateMask is abstract; 
  28.    --  <dref>ReadCondition_get_view_state_mask</dref> 
  29.  
  30.    function Get_Instance_State_Mask 
  31.      (Self : not null access Ref) 
  32.      return DDS.InstanceStateMask is abstract; 
  33.    --  <dref>ReadCondition_get_instance_state_mask</dref> 
  34.  
  35.    function Get_DataReader 
  36.      (Self : not null access Ref) 
  37.      return access DDS.DataReader.Ref'Class is abstract; 
  38.    --  <dref>ReadCondition_get_datareader</dref> 
  39.  
  40. end DDS.ReadCondition;