pike.git / src / interpreter.h

version» Context lines:

pike.git/src/interpreter.h:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: interpreter.h,v 1.80 2002/11/10 20:19:18 grubba Exp $ + || $Id: interpreter.h,v 1.81 2003/01/09 15:21:26 grubba Exp $   */      #undef LOW_GET_ARG   #undef LOW_GET_JUMP   #undef LOW_SKIPJUMP   #undef GET_ARG   #undef GET_ARG2   #undef GET_JUMP   #undef SKIPJUMP   #undef DOJUMP
pike.git/src/interpreter.h:48:   #if PIKE_BYTECODE_METHOD == PIKE_BYTECODE_SPARC   #define LOW_GET_JUMP() (PROG_COUNTER[0])   #define LOW_SKIPJUMP() (++PROG_COUNTER)   #else /* PIKE_BYTECODE_METHOD != PIKE_BYTECODE_SPARC */   #define LOW_GET_JUMP() EXTRACT_INT(PROG_COUNTER)   #define LOW_SKIPJUMP() (PROG_COUNTER += sizeof(INT32))   #endif /* PIKE_BYTECODE_METHOD */      #ifdef PIKE_DEBUG    - #define GET_ARG() (backlog[backlogp].arg=(\ -  instr=prefix,\ -  prefix=0,\ -  instr += LOW_GET_ARG(),\ -  (t_flag>3 ? sprintf(trace_buffer, "- Arg = %ld\n", \ -  (long)instr), \ -  write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0),\ + #define GET_ARG() (backlog[backlogp].arg=( \ +  instr=prefix, \ +  prefix=0, \ +  instr += LOW_GET_ARG(), \ +  (Pike_interpreter.trace_level>3 ? \ +  sprintf(trace_buffer, "- Arg = %ld\n", (long)instr), \ +  write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0), \    instr))    - #define GET_ARG2() (backlog[backlogp].arg2=(\ -  instr=prefix2,\ -  prefix2=0,\ -  instr += LOW_GET_ARG(),\ -  (t_flag>3 ? sprintf(trace_buffer, "- Arg2 = %ld\n", \ -  (long)instr), \ -  write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0),\ + #define GET_ARG2() (backlog[backlogp].arg2=( \ +  instr=prefix2, \ +  prefix2=0, \ +  instr += LOW_GET_ARG(), \ +  (Pike_interpreter.trace_level>3 ? \ +  sprintf(trace_buffer, "- Arg2 = %ld\n", (long)instr), \ +  write_to_stderr(trace_buffer,strlen(trace_buffer)) : 0), \    instr))      #else /* !PIKE_DEBUG */      #define GET_ARG() (instr=prefix,prefix=0,instr+LOW_GET_ARG())   #define GET_ARG2() (instr=prefix2,prefix2=0,instr+LOW_GET_ARG())      #endif /* PIKE_DEBUG */      #endif /* HAVE_COMPUTED_GOTO */
pike.git/src/interpreter.h:104:    debug_malloc_touch(Pike_fp);    while(1)    {    instr = pc[0];    Pike_fp->pc = pc++;       STEP_BREAK_LINE      #ifdef PIKE_DEBUG    -  if(t_flag > 2) +  if(Pike_interpreter.trace_level > 2)    {    char *file, *f;    struct pike_string *filep;    INT32 linep;       filep = get_line(pc-1,Pike_fp->context.prog,&linep);    file = filep->str;    while((f=STRCHR(file,'/')))    file=f+1;    fprintf(stderr,"- %s:%4ld:(%lx): %-25s %4ld %4ld\n",