pike.git/ src/ interpret_functions.h

2014-08-18

2014-08-18 13:12:34 by Per Hedbor <ph@opera.com>

• 8e0f6f284514dc887fe5ffbe40906605712391af (13 lines) (+2/-11) ^{[ Show | Annotate ]}
  Branch: 8.0

Fixed bug in F_UNDEFINEDP

2897:    JUMP_DONE;   });    - #if 0 - /* This opcode needs mending if it is to work with machine code. */ - OPCODE0_JUMP(F_BREAKPOINT, "breakpoint", 0, { -  extern void o_breakpoint(void); -  o_breakpoint(); -  DO_JUMP_TO(PROG_COUNTER-1); - }); - #endif -  +    OPCODE1(F_THIS_OBJECT, "this_object", I_UPDATE_SP, {    LOCAL_VAR(int level);    LOCAL_VAR(struct object *o);
2929:    if(TYPEOF(Pike_sp[-1]) != T_INT)    {    pop_stack(); -  push_int(1); +  push_int(0);    return;    }    undef = SUBTYPEOF(Pike_sp[-1]) == NUMBER_UNDEFINED;
2937:    undef);   });    -  +    OPCODE0(F_DESTRUCTEDP,"destructedp",0, {    if((TYPEOF(Pike_sp[-1]) == T_OBJECT || TYPEOF(Pike_sp[-1]) == T_FUNCTION)    && !Pike_sp[-1].u.object->prog)