pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.93 2001/09/24 14:17:34 grubba Exp $ +  * $Id: interpret_functions.h,v 1.94 2001/09/28 00:01:44 hubbe Exp $    *    * Opcode definitions for the interpreter.    */      #include "global.h"      #undef CJUMP   #undef AUTO_BIGNUM_LOOP_TEST   #undef LOOP   #undef COMPARISON
pike.git/src/interpret_functions.h:191:      OPCODE1(F_NEG_NUMBER, "push -int", {    push_int(-arg1);   });      OPCODE1(F_CONSTANT, "constant", {    push_svalue(& Pike_fp->context.prog->constants[arg1].sval);    print_return_value();   });    + OPCODE0(F_SWAP,"swap",{ +  struct svalue tmp; +  tmp=Pike_sp[-2]; +  Pike_sp[-2]=Pike_sp[-1]; +  Pike_sp[-1]=tmp; + }); +    /* The rest of the basic 'push value' instructions */      OPCODE1_TAIL(F_MARK_AND_STRING, "mark & string", {    *(Pike_mark_sp++)=Pike_sp;       OPCODE1(F_STRING, "string", {    copy_shared_string(Pike_sp->u.string,Pike_fp->context.prog->strings[arg1]);    Pike_sp->type=PIKE_T_STRING;    Pike_sp->subtype=0;    Pike_sp++;