pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:2681:    /* FIXME: Ought to write out the object here. */    Pike_error ("Object %d level(s) up lacks parent reference.\n", level);    o = PARENT_INFO(o)->parent;    }    ref_push_object(o);    });      OPCODE0(F_ZERO_TYPE, "zero_type", 0, {    if(Pike_sp[-1].type != T_INT)    { -  if((Pike_sp[-1].type==T_OBJECT || Pike_sp[-1].type==T_FUNCTION) -  && !Pike_sp[-1].u.object->prog) +  if(IS_DESTRUCTED(Pike_sp-1))    {    pop_stack();    push_int(NUMBER_DESTRUCTED);    }else{    pop_stack();    push_int(0);    }    }else{    Pike_sp[-1].u.integer=Pike_sp[-1].subtype;    Pike_sp[-1].subtype=NUMBER_NUMBER;