pike.git / src / peep.c

version» Context lines:

pike.git/src/peep.c:12:   #include "peep.h"   #include "dmalloc.h"   #include "stuff.h"   #include "bignum.h"   #include "opcodes.h"   #include "builtin_functions.h"   #include "constants.h"   #include "interpret.h"   #include "pikecode.h"    - RCSID("$Id: peep.c,v 1.65 2001/07/24 13:51:53 grubba Exp $"); + RCSID("$Id: peep.c,v 1.66 2001/08/13 23:15:58 mast 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:261:   #endif    FLUSH_CODE_GENERATOR_STATE();    for(e=0;e<length;e++)    {    int linenumbers_stored=0;   #ifdef PIKE_DEBUG    if((a_flag > 2 && store_linenumbers) || a_flag > 3)    {    if (c->opcode == F_POP_SYNCH_MARK) synch_depth--;    fprintf(stderr, "===%4d %4lx %*s", c->line, -  DO_NOT_WARN((unsigned long)PC), synch_depth, ""); +  DO_NOT_WARN((unsigned long)PIKE_PC), synch_depth, "");    dump_instr(c);    fprintf(stderr,"\n");    if (c->opcode == F_SYNCH_MARK) synch_depth++;    }   #endif       if(store_linenumbers)    store_linenumber(c->line, c->file);       switch(c->opcode)
pike.git/src/peep.c:304:       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] = DO_NOT_WARN((INT32)PC); +  labels[c->arg] = DO_NOT_WARN((INT32)PIKE_PC);    UPDATE_PC();    FLUSH_CODE_GENERATOR_STATE();    break;       case F_VOLATILE_RETURN:    ins_f_byte(F_RETURN);    break;       default:    switch(instrs[c->opcode - F_OFFSET].flags)
pike.git/src/peep.c:333: Inside #if defined(INS_F_JUMP)
   break;    }   #endif       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)PC); +  tmp = DO_NOT_WARN((INT32)PIKE_PC);    ins_pointer(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);
pike.git/src/peep.c:377: Inside #if defined(ALIGN_PIKE_JUMPS)
   case F_RETURN_LOCAL:      #define CALLS(X) \    case PIKE_CONCAT3(F_,X,_AND_RETURN): \    case PIKE_CONCAT3(F_MARK_,X,_AND_RETURN):       CALLS(APPLY)    CALLS(CALL_FUNCTION)    CALLS(CALL_LFUN)    CALLS(CALL_BUILTIN) -  while( ((INT32) PC & (ALIGN_PIKE_JUMPS-1) ) ) +  while( ((INT32) PIKE_PC & (ALIGN_PIKE_JUMPS-1) ) )    ins_byte(0);    }    }   #endif       c++;    }       for(e=0;e<=max_label;e++)    {