1998-11-20
1998-11-20 18:38:46 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
9750c3461c345d084c7a61ea2ba3015e4c9b8f77
(9 lines)
(+8/-1)
[
Show
| Annotate
]
Branch: 7.9
more debug
Rev: src/interpret.c:1.108
Rev: src/threads.h:1.57
4:
||| See the files COPYING and DISCLAIMER for more information.
\*/
#include "global.h"
- RCSID("$Id: interpret.c,v 1.107 1998/11/20 08:38:12 hubbe Exp $");
+ RCSID("$Id: interpret.c,v 1.108 1998/11/20 18:38:44 hubbe Exp $");
#include "interpret.h"
#include "object.h"
#include "program.h"
1808: Inside #if defined(PROFILING) and #if defined(HAVE_GETHRTIME)
long long children_base = accounted_time;
long long start_time = gethrtime() - time_base;
unsigned INT32 self_time_base;
+ if(start_time < 0)
+ {
+ fatal("gethrtime() shrunk\n start_time=%ld\n time_base=%ld\n",
+ (long)(start_time/100000),
+ (long)(time_base/100000));
+ }
#endif
#endif