Add minor fixing resolving confusion of gcc6

examples/example_hl.f90

@@ -2,7 +2,7 @@ PROGRAM example
 
   USE, INTRINSIC :: iso_c_binding, ONLY: c_char, c_int64_t, c_double
   USE mtime_hl
-  USE mo_event_group, ONLY: t_eventGroup
+  USE mo_event_group, ONLY: t_eventGroup, max_groupname_str_len
   
   IMPLICIT NONE
   

examples/mo_event_group.f90

 MODULE mo_event_group
 
-  USE mtime_hl,               ONLY: max_groupname_str_len, t_event
+  USE mtime_hl,               ONLY: t_event
   USE mo_generic_linked_list, ONLY: t_generic_linked_list, t_generic_linked_list_item
 
   IMPLICIT NONE
 
+  PRIVATE
+
+  INTEGER, PARAMETER :: MAX_GROUPNAME_STR_LEN = 132
+  
   TYPE, EXTENDS(t_generic_linked_list_item) :: t_event_item
     TYPE(t_event), POINTER :: event
   CONTAINS
@@ -39,6 +43,8 @@ MODULE mo_event_group
 
   INTEGER :: event_group_id = 0
 
+  PUBLIC :: t_eventGroup, t_event_item, MAX_GROUPNAME_STR_LEN
+  
 CONTAINS
 
   ! ================================================================================

src/libmtime_hl.f90

@@ -58,8 +58,7 @@ MODULE mtime_hl
   !
   PUBLIC :: divisionquotienttimespan
   PUBLIC :: MAX_DATETIME_STR_LEN, MAX_TIMEDELTA_STR_LEN, MAX_CALENDAR_STR_LEN
-  PUBLIC :: MAX_EVENTNAME_STR_LEN, MAX_GROUPNAME_STR_LEN, MAX_REPETITION_STR_LEN
-  PUBLIC :: MAX_MTIME_ERROR_STR_LEN
+  PUBLIC :: MAX_EVENTNAME_STR_LEN, MAX_REPETITION_STR_LEN, MAX_MTIME_ERROR_STR_LEN
   PUBLIC :: no_of_sec_in_a_day, no_of_sec_in_a_hour, no_of_sec_in_a_minute, &
        &    no_of_ms_in_a_hour, no_of_ms_in_a_minute, no_of_ms_in_a_day,    &
        &    no_of_ms_in_a_second

src/mtime_constants.f90

@@ -49,9 +49,6 @@ module mtime_constants
   integer, parameter :: max_eventname_str_len = 132
   integer, parameter :: max_event_str_len = 512
 
-  !> provides a string length for toString
-  integer, parameter :: max_groupname_str_len = 132
-
   integer, parameter :: max_repetition_str_len = 132
 
 contains