pike.git / src / peep.c

version» Context lines:

pike.git/src/peep.c:8:   #include "main.h"   #include "pike_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.46 2001/08/15 15:29:23 mast Exp $"); + RCSID("$Id: peep.c,v 1.47 2002/04/12 09:30:12 grubba Exp $");      static void asm_opt(void);      dynamic_buffer instrbuf;      static int hasarg(int opcode)   {    return instrs[opcode-F_OFFSET].flags & I_HASARG;   }   
pike.git/src/peep.c:344:    break;    case F_ALIGN:    while(PIKE_PC % c->arg) add_to_program(0);    break;       case F_BYTE:    add_to_program((unsigned char)(c->arg));    break;       case F_DATA: -  ins_int(c->arg, (void(*)(char))add_to_program); +  add_relocated_int_to_program(c->arg);    break;       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");
pike.git/src/peep.c:370:    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 = DO_NOT_WARN((INT32)PIKE_PC); -  ins_int(jumps[c->arg], (void(*)(char))add_to_program); +  add_relocated_int_to_program(jumps[c->arg]);    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);    break;