pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.59 2001/06/16 17:07:44 per Exp $ +  * $Id: interpret_functions.h,v 1.60 2001/06/17 18:18:05 grubba Exp $    *    * Opcode definitions for the interpreter.    */      OPCODE0(F_UNDEFINED,"push UNDEFINED")    push_int(0);    Pike_sp[-1].subtype=NUMBER_UNDEFINED;   BREAK;      OPCODE0(F_CONST0, "push 0")
pike.git/src/interpret_functions.h:1424:   BREAK;      OPCODE2(F_MAGIC_SET_INDEX, "::`[]=")    push_magic_index(magic_set_index_program, arg2, arg1);   BREAK;      OPCODE0(F_CAST, "cast")    f_cast();   BREAK;    + OPCODE0(F_CAST_TO_INT, "cast_to_int") +  o_cast_to_int(); + BREAK; +    OPCODE0(F_SOFT_CAST, "soft cast")    /* Stack: type_string, value */   #ifdef PIKE_DEBUG    if (Pike_sp[-2].type != T_TYPE) {    fatal("Argument 1 to soft_cast isn't a type!\n");    }   #endif /* PIKE_DEBUG */    if (runtime_options & RUNTIME_CHECK_TYPES) {    struct pike_type *sval_type = get_type_of_svalue(Pike_sp-1);    if (!pike_types_le(sval_type, Pike_sp[-2].u.type)) {