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.34 2000/08/14 17:18:06 grubba Exp $"); + RCSID("$Id: peep.c,v 1.35 2000/08/16 10:17:52 grubba Exp $");      struct p_instr_s   {    short opcode;    short line;    struct pike_string *file;    INT32 arg;    INT32 arg2;   };   
pike.git/src/peep.c:304:    length=instrbuf.s.len / sizeof(p_instr);       for(e=0;e<=max_label;e++) labels[e]=jumps[e]=-1;       c=(p_instr *)instrbuf.s.str;    for(e=0;e<length;e++)    {   #ifdef PIKE_DEBUG    if((a_flag > 2 && store_linenumbers) || a_flag > 3)    { -  fprintf(stderr,"===%3d %4x ",c->line,PC); +  fprintf(stderr, "===%3d %4lx ", c->line, +  DO_NOT_WARN((unsigned long)PC));    dump_instr(c);    fprintf(stderr,"\n");    }   #endif       if(store_linenumbers)    store_linenumber(c->line, c->file);       switch(c->opcode)    {
pike.git/src/peep.c:339:       case F_LABEL:    if(c->arg == -1) break;   #ifdef PIKE_DEBUG    if(c->arg > max_label || c->arg < 0)    fatal("max_label calculation failed!\n");       if(labels[c->arg] != -1)    fatal("Duplicate label!\n");   #endif -  labels[c->arg]=PC; +  labels[c->arg] = DO_NOT_WARN((INT32)PC);    break;       default:    switch(instrs[c->opcode - F_OFFSET].flags)    {    case I_ISJUMP:    ins_f_byte(c->opcode);       case I_ISPOINTER:   #ifdef PIKE_DEBUG    if(c->arg > max_label || c->arg < 0) fatal("Jump to unknown label?\n");   #endif -  tmp=PC; +  tmp = DO_NOT_WARN((INT32)PC);    ins_int(jumps[c->arg], (void(*)(char))add_to_program);    jumps[c->arg]=tmp;    break;       case I_TWO_ARGS:    ins_f_byte_with_2_args(c->opcode, c->arg,c->arg2);    break;       case I_HASARG:    ins_f_byte_with_arg(c->opcode, c->arg);