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.273 2002/10/28 13:02:02 nilsson Exp $ + || $Id: interpret.c,v 1.274 2002/10/30 17:02:40 nilsson Exp $   */      #include "global.h" - RCSID("$Id: interpret.c,v 1.273 2002/10/28 13:02:02 nilsson Exp $"); + RCSID("$Id: interpret.c,v 1.274 2002/10/30 17:02:40 nilsson 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:867: Inside #if defined(__GNUC__)
   do_escape_catch_label = && inter_escape_catch_label;       /* Trick optimizer */    if(!dummy_label)    return 0;    }      #ifdef PIKE_DEBUG    if (t_flag) {    int i; -  fprintf(stderr, "Calling code at 0x%p:\n", pc); +  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",    ((int *)pc)[i],    ((int *)pc)[i+1],