pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c: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: interpret.c,v 1.293 2003/02/16 17:50:09 grubba Exp $ + || $Id: interpret.c,v 1.294 2003/02/26 18:19:08 mast Exp $   */      #include "global.h" - RCSID("$Id: interpret.c,v 1.293 2003/02/16 17:50:09 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.294 2003/02/26 18:19:08 mast Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "pike_error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:919: Inside #if defined(__GNUC__)
  DEF_PROG_COUNTER;      #ifdef PIKE_DEBUG   /* Note: The debug code is extracted, to keep the frame size constant. */   static int eval_instruction_low(PIKE_OPCODE_T *pc);   #endif /* PIKE_DEBUG */      static int eval_instruction(PIKE_OPCODE_T *pc)   #ifdef PIKE_DEBUG   { -  if (Pike_interpreter.trace_level && pc) { +  if (Pike_interpreter.trace_level > 5 && pc) {    int i;    fprintf(stderr, "Calling code at %p:\n", pc);   #ifdef PIKE_OPCODE_ALIGN    if (((INT32)pc) % PIKE_OPCODE_ALIGN) {    Pike_fatal("Odd offset!\n");    }   #endif /* PIKE_OPCODE_ALIGN */    for (i=0; i < 16; i+=4) {    fprintf(stderr,    " 0x%08x 0x%08x 0x%08x 0x%08x\n",