diff --git a/src/mtime_t_event.inc b/src/mtime_t_event.inc
index 44c9c11e9ef0e40abb2ebbe4a1b964c195e1cffe..e8db15edb01e684b018438f243d3ba64d29b48ba 100644
--- a/src/mtime_t_event.inc
+++ b/src/mtime_t_event.inc
@@ -134,6 +134,10 @@
 
     ret = my_isCurrentEventActive(c_loc(tmp_ev), tmp_dt, &
           &                       tmp_plus,  tmp_minus)
+
+    CALL my_deallocatedatetime(tmp_dt)
+    if (c_associated(tmp_plus))  CALL my_deallocatetimedelta(tmp_plus)
+    if (c_associated(tmp_minus)) CALL my_deallocatetimedelta(tmp_minus)
   END FUNCTION t_event_is_active
 
   ! ================================================================================