1. pragma Ada_2012; 
  2.  
  3.  
  4. --  (c) Copyright, Real-Time Innovations, $Date:: 2012-02-16 #$ 
  5. --  All rights reserved. 
  6. -- 
  7. --  No duplications, whole or partial, manual or electronic, may be made 
  8. --  without express written permission.  Any such copies, or 
  9. --  revisions thereof, must display this notice unaltered. 
  10. --  This code contains trade secrets of Real-Time Innovations, Inc. 
  11.  
  12.  
  13. with RTIDDS.Low_Level.ndds_ndds_config_c_h; 
  14. with RTIDDS.Low_Level.ndds_dds_c_dds_c_infrastructure_h; 
  15. with DDS.Logger; 
  16.  
  17. --  <module name="NDDSTransportModule" actualName="Pluggable Transport">ndds_transport</module> 
  18. --  <defgroup>TransportUserGroupDocs</defgroup> 
  19. --  <defgroup>TransportBuiltinGroupDocs</defgroup> 
  20. --  <module name="NDDSLogVersionModule" actualName="Logging and Version">ndds_config</module> 
  21. package RTIDDS.Config is 
  22.  
  23.    package Logger renames DDS.Logger; 
  24.  
  25.  
  26.    type LibraryVersion is new RTIDDS.Low_Level.ndds_ndds_config_c_h.NDDS_Config_LibraryVersion_t; 
  27.    --  <defgroup>VersionGroupDocs</defgroup> 
  28.    --  <dref>LibraryVersion_t</dref> 
  29.    --  <dref name="major">LibraryVersion_t_major</dref> 
  30.    --  <dref name="minor">LibraryVersion_t_minor</dref> 
  31.    --  <dref name="release">LibraryVersion_t_release</dref> 
  32.    --  <dref name="build">LibraryVersion_t_build</dref> 
  33.  
  34.    type ProductVersion is new RTIDDS.Low_Level.ndds_dds_c_dds_c_infrastructure_h.DDS_ProductVersion_t; 
  35.    --  <dref>ProductVersion_t</dref> 
  36.    --  <dref name="major">ProductVersion_t_major</dref> 
  37.    --  <dref name="minor">ProductVersion_t_minor</dref> 
  38.    --  <dref name="release">ProductVersion_t_release</dref> 
  39.    --  <dref name="revision">ProductVersion_t_revision</dref> 
  40.  
  41.    function get_api_version return LibraryVersion; 
  42.    --  <dref>Version_t_get_c_api_version</dref> 
  43.  
  44.    function get_api_version return String; 
  45.    --  <dref>Version_t_get_c_api_version</dref> 
  46.    --  <internal> 
  47.    --  Get the version of the C API library. 
  48.    --  </internal> 
  49.  
  50.    function get_core_version return LibraryVersion; 
  51.    --  <dref>Version_t_get_core_version</dref> 
  52.  
  53.    function get_core_version return String; 
  54.    --  <dref>Version_t_get_core_version</dref> 
  55.    --  <internal> 
  56.    --  Get the version of the core library. 
  57.    --  </internal> 
  58.  
  59.  
  60.    function get_product_version return ProductVersion; 
  61.    --  <dref>Version_t_get_product_version</dref> 
  62.  
  63.    function get_product_version return String; 
  64.    --  <dref>Version_t_get_product_version</dref> 
  65.  
  66.    function Image (Item : LibraryVersion) return String; 
  67.    function Image (Item : ProductVersion) return String; 
  68.  
  69.    function get_core_build_number return Standard.String; 
  70.    function get_C_build_number return Standard.String; 
  71.  
  72.  
  73. end RTIDDS.Config;