Branch: Tag:

1998-11-20

1998-11-20 01:57:24 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

profiling should now work with threads

Rev: src/interpret.c:1.100
Rev: src/interpret.h:1.23
Rev: src/threads.h:1.54

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.99 1998/11/16 22:14:50 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.100 1998/11/20 01:57:21 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
68:   struct svalue **mark_stack; /* Start of stack */   int mark_stack_malloced = 0;    + #ifdef PROFILING + #ifdef HAVE_GETHRTIME + long long accounted_time =0; + long long time_base =0; + #endif + #endif +    void push_sp_mark(void)   {    if(mark_sp == mark_stack + stack_size)
1792: Inside #if defined(PROFILING)
   struct svalue *save_sp=sp-args;   #ifdef PROFILING   #ifdef HAVE_GETHRTIME -  static long long accounted_time =0; +     long long children_base = accounted_time;    long long start_time = gethrtime();    unsigned INT32 self_time_base;