pike.git / src / interpreter.h

version» Context lines:

pike.git/src/interpreter.h:4: Inside #if defined(PIKE_DEBUG)
     #ifdef PIKE_DEBUG      #define GET_ARG() (backlog[backlogp].arg=(\    instr=prefix,\    prefix=0,\    instr+=EXTRACT_UCHAR(pc++),\    (t_flag>3 ? sprintf(trace_buffer,"- Arg = %ld\n",(long)instr),write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0),\    instr))    - #define GET_ARG2() (\ + #define GET_ARG2() (backlog[backlogp].arg2=(\    instr=prefix2,\    prefix2=0,\    instr+=EXTRACT_UCHAR(pc++),\    (t_flag>3 ? sprintf(trace_buffer,"- Arg2= %ld\n",(long)instr),write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0),\ -  instr) +  instr))      #else   #define GET_ARG() (instr=prefix,prefix=0,instr+EXTRACT_UCHAR(pc++))   #define GET_ARG2() (instr=prefix2,prefix2=0,instr+EXTRACT_UCHAR(pc++))   #endif      static int eval_instruction(unsigned char *pc)   {    unsigned INT32 prefix2=0,instr, prefix=0;    debug_malloc_touch(Pike_fp);
pike.git/src/interpreter.h:40: Inside #if defined(PIKE_DEBUG) and #if defined(_REENTRANT)
   if(d_flag>1 && thread_for_id(th_self()) != thread_id)    fatal("thread_for_id() (or thread_id) failed in interpreter.h! %p != %p\n",thread_for_id(th_self()),thread_id);   #endif       Pike_sp[0].type=99; /* an invalid type */    Pike_sp[1].type=99;    Pike_sp[2].type=99;    Pike_sp[3].type=99;       if(Pike_sp<Pike_evaluator_stack || Pike_mark_sp < Pike_mark_stack || Pike_fp->locals>Pike_sp) -  fatal("Stack error (generic).\n"); +  fatal("Stack error (generic) sp=%p/%p mark_sp=%p/%p locals=%p.\n", +  Pike_sp, +  Pike_evaluator_stack, +  Pike_mark_sp, +  Pike_mark_stack, +  Pike_fp->locals);       if(Pike_sp > Pike_evaluator_stack+Pike_stack_size)    fatal("Stack error (overflow).\n");       if(/* Pike_fp->fun>=0 && */ Pike_fp->current_object->prog &&    Pike_fp->locals+Pike_fp->num_locals > Pike_sp)    fatal("Stack error (stupid!).\n");       if(recoveries && Pike_sp-Pike_evaluator_stack < recoveries->Pike_sp)    fatal("Stack error (underflow).\n");