Branch: Tag:

2001-08-19

2001-08-19 03:30:10 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

shaved another percent or two from function call code...

Rev: src/interpret.c:1.244
Rev: src/interpret.h:1.99

5:   \*/      /* -  * $Id: interpret.h,v 1.98 2001/08/16 04:38:50 mast Exp $ +  * $Id: interpret.h,v 1.99 2001/08/19 03:30:10 hubbe Exp $    */   #ifndef INTERPRET_H   #define INTERPRET_H
323:    SAFE_APPLY_MASTER(FUN, ARGS); \    } while(0)    - #define check_threads_etc() \ -  call_callback(& evaluator_callbacks, (void *)0) +     -  + #define check_threads_etc() do { \ +  if(evaluator_callbacks.callbacks) \ +  call_callback(& evaluator_callbacks, (void *)0); \ + }while(0) +    #ifdef PIKE_DEBUG   #define fast_check_threads_etc(X) do { \    static int div_; if(d_flag || !(div_++& ((1<<(X))-1))) check_threads_etc(); } while(0)