pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.96 2001/09/29 08:47:03 hubbe Exp $ +  * $Id: interpret_functions.h,v 1.97 2001/10/05 01:30:13 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:2203:    {    ref_push_object(Pike_fp->current_object);    }else{    push_int(0);    }   });      OPCODE0(F_ZERO_TYPE, "zero_type", {    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) +  {    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;    }   });      #undef PROG_COUNTER