pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.76 2001/07/16 19:48:57 hubbe Exp $ +  * $Id: interpret_functions.h,v 1.77 2001/07/17 17:50:38 grubba 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:216:    tmp2.subtype = 1;    index_no_free(&tmp, Pike_sp-1, &tmp2);    }    free_svalue(Pike_sp-1);    Pike_sp[-1] = tmp;    print_return_value();   });      OPCODE0(F_FLOAT, "push float", {    /* FIXME, this opcode uses 'PROG_COUNTER' which is not allowed.. */ -  Pike_sp->type=PIKE_T_FLOAT; +     MEMCPY((void *)&Pike_sp->u.float_number, PROG_COUNTER, sizeof(FLOAT_TYPE));    PROG_COUNTER += DO_IF_ELSE_COMPUTED_GOTO(1, sizeof(FLOAT_TYPE));    FETCH; -  +  Pike_sp->type=PIKE_T_FLOAT;    Pike_sp++;   });      OPCODE1(F_LFUN, "local function", {    Pike_sp->u.object=Pike_fp->current_object;    add_ref(Pike_fp->current_object);    Pike_sp->subtype=arg1+Pike_fp->context.identifier_level;    Pike_sp->type=PIKE_T_FUNCTION;    Pike_sp++;    print_return_value();
pike.git/src/interpret_functions.h:1279:   OPCODE0(F_RETURN_IF_TRUE,"return if true",{    if(!IS_ZERO(Pike_sp-1)) DO_RETURN;    pop_stack();   });      OPCODE0(F_RETURN_1,"return 1",{    push_int(1);    DO_RETURN;   });    -  +    OPCODE0(F_RETURN_0,"return 0",{    push_int(0);    DO_RETURN;   });    -  +    OPCODE0(F_RETURN, "return", {    DO_RETURN;   });      OPCODE0(F_DUMB_RETURN,"dumb return", {    DO_DUMB_RETURN;   });      OPCODE0(F_NEGATE, "unary minus", {    if(Pike_sp[-1].type == PIKE_T_INT)