[develop] fixed initialization of result datetime.

src/mtime_t_event.inc

@@ -161,6 +161,8 @@
     TYPE(c_ptr)              :: event_triggerNextEventDateTime, c_pointer1
     LOGICAL(c_bool)          :: event_nextEventIsFirst
 
+    res = this%triggerNextEventDateTime
+
     IF (PRESENT(query_start_dt)) THEN
       ! if a start for our query is given, invoke
       ! "my_gettriggernexteventatdatetime":
@@ -204,9 +206,6 @@
         &     CALL my_deallocatedatetime(event_triggerNextEventDateTime      )
 
       CALL my_deallocatedatetime(c_pointer1)
-
-    ELSE
-      res = this%triggerNextEventDateTime
     END IF
   END FUNCTION t_event_getNextOccurrenceDatetime