pike.git / src / peep.c

version» Context lines:

pike.git/src/peep.c:8:   #include "main.h"   #include "error.h"   #include "lex.h"   #include "pike_memory.h"   #include "peep.h"   #include "dmalloc.h"   #include "stuff.h"   #include "bignum.h"   #include "opcodes.h"    - RCSID("$Id: peep.c,v 1.35 2000/08/16 10:17:52 grubba Exp $"); + RCSID("$Id: peep.c,v 1.36 2000/08/17 19:15:59 grubba Exp $");      struct p_instr_s   {    short opcode;    short line;    struct pike_string *file;    INT32 arg;    INT32 arg2;   };   
pike.git/src/peep.c:388:    }       for(e=0;e<=max_label;e++)    {    int tmp2=labels[e];       while(jumps[e]!=-1)    {   #ifdef PIKE_DEBUG    if(labels[e]==-1) -  fatal("Hyperspace error: unknown jump point %d at %d (pc=%x).\n",e,labels[e],jumps[e]); +  fatal("Hyperspace error: unknown jump point %ld at %d (pc=%x).\n", +  PTRDIFF_T_TO_LONG(e), labels[e], jumps[e]);   #endif    tmp=read_int(jumps[e]);    upd_int(jumps[e], tmp2 - jumps[e]);    jumps[e]=tmp;    }    }       free((char *)labels);    free((char *)jumps);    free((char *)uses);