pike.git/ src/ builtin.cmod

2002-04-08

2002-04-08 01:17:05 by Martin Stjernholm <mast@lysator.liu.se>

• 90f87652ed5cebe1fd65343fcf7bbb5802e37b01 (15 lines) (+5/-10) ^{[ Show | Annotate ]}
  Branch: 7.9

Removed the kludge which tries to compensate for the use of offsets in
pike_frame->pc when --with-machine-code is used.

Rev: src/builtin.cmod:1.83

1:   /* -*- c -*- -  * $Id: builtin.cmod,v 1.82 2002/04/08 00:41:16 nilsson Exp $ +  * $Id: builtin.cmod,v 1.83 2002/04/08 01:17:05 mast Exp $    */      #include "global.h"
876:    PIKEVAR mixed fun;    PIKEVAR array args;    CVAR struct program *prog; /* FIXME: Ought to be a private pikevar... */ -  CVAR unsigned char *pc; +  CVAR PIKE_OPCODE_T *pc;    CVAR struct pike_string *filename;    CVAR INT_TYPE lineno;   
885:    THIS->fun.type = T_INT;    THIS->fun.u.integer = 0;    THIS->prog = NULL; -  THIS->pc = 0; +  THIS->pc = NULL;    THIS->lineno = 0;    THIS->args = NULL;    THIS->filename = NULL;
1183:       if ((bf->prog = f->context.prog)) {    add_ref(bf->prog); -  bf->pc = f->pc + ( (f->flags & PIKE_FRAME_RETURN_INTERNAL) ? - #ifndef USE_MACHINE_CODE -  -1 : 0 - #else -  -1 : (long)(f->context.prog->program) - #endif -  ); +  bf->pc = f->pc + ( (f->flags & PIKE_FRAME_RETURN_INTERNAL) ? -1 : 0);       }