diff --git a/src/interpret.c b/src/interpret.c
index b53703218744cbf377d11d59f1754075d67b4347..5e583c65ed88b114f7e716874e7c42538a3f4eeb 100644
--- a/src/interpret.c
+++ b/src/interpret.c
@@ -4,7 +4,7 @@
 ||| See the files COPYING and DISCLAIMER for more information.
 \*/
 #include "global.h"
-RCSID("$Id: interpret.c,v 1.102 1998/11/20 07:39:18 hubbe Exp $");
+RCSID("$Id: interpret.c,v 1.103 1998/11/20 08:04:09 hubbe Exp $");
 #include "interpret.h"
 #include "object.h"
 #include "program.h"
@@ -2118,12 +2118,14 @@ void mega_apply(enum apply_type type, INT32 args, void *arg1, void *arg2)
 	accounted_time+=self_time;
 #ifdef DEBUG
 	if(self_time < 0)
-	  fatal("Self time is negative\n  self_time=%ld\n  time_passed=%ld\n  time_in_children=%ld\n  children_base=%ld\n  accounted_time=%ld!\n",
+	  fatal("Self time is negative\n  self_time=%ld\n  time_passed=%ld\n  time_in_children=%ld\n  children_base=%ld\n  accounted_time=%ld!\n  time_base=%ld\n  start_time=%ld\n",
 		(long)(self_time/1000),
 		(long)(time_passed/1000),
 		(long)(time_in_children/1000),
 		(long)(children_base/1000),
 		(long)(accounted_time/1000)
+		(long)(time_base/1000)
+		(long)(start_time/1000)
 		);
 #endif
 	function->total_time=self_time_base + (INT32)(time_passed /1000);