pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:2619:      #undef DO_CALL_BUILTIN   #ifdef PIKE_DEBUG   #define DO_CALL_BUILTIN(ARGS) do { \    int args_=(ARGS); \    struct svalue *expected_stack=Pike_sp-args_; \    LOCAL_VAR(struct svalue *s); \    s = &Pike_fp->context->prog->constants[arg1].sval; \    if(Pike_interpreter.trace_level) \    { \ -  LOCAL_VAR(dynamic_buffer save_buf); \ -  init_buf(&save_buf); \ -  if (s->u.efun->name->size_shift) \ -  my_strcat ("[widestring function name]"); \ -  else \ -  my_strcat (s->u.efun->name->str); \ -  do_trace_call(args_, &save_buf); \ +  do_trace_efun_call(s, args_); \    } \    if (PIKE_FN_START_ENABLED()) { \    /* DTrace enter probe \    arg0: function name \    arg1: object \    */ \    PIKE_FN_START(s->u.efun->name->size_shift == 0 ? \    s->u.efun->name->str : "[widestring fn name]", \    ""); \    } \
pike.git/src/interpret_functions.h:2656:    s->u.efun->name->str); \    if(Pike_sp == expected_stack && !s->u.efun->may_return_void) \    Pike_fatal("Non-void function returned without return value " \    "on stack: %s %d\n", \    s->u.efun->name->str,s->u.efun->may_return_void); \    if(Pike_sp==expected_stack+1 && s->u.efun->may_return_void) \    Pike_fatal("Void function returned with a value on the stack: %s %d\n", \    s->u.efun->name->str, s->u.efun->may_return_void); \    } \    if(Pike_interpreter.trace_level>1) { \ -  LOCAL_VAR(dynamic_buffer save_buf); \ -  init_buf(&save_buf); \ -  if (s->u.efun->name->size_shift) \ -  my_strcat ("[widestring function name]"); \ -  else \ -  my_strcat (s->u.efun->name->str); \ -  my_strcat ("() "); \ -  do_trace_return (Pike_sp>expected_stack, &save_buf); \ +  do_trace_efun_return(s, Pike_sp>expected_stack); \    } \    if (PIKE_FN_DONE_ENABLED()) { \    /* DTrace leave probe \    arg0: function name \    */ \    PIKE_FN_DONE(s->u.efun->name->size_shift == 0 ? \    s->u.efun->name->str : "[widestring fn name]"); \    } \   }while(0)   #else