pike.git/ src/ interpret_functions.h

2012-06-22

2012-06-22 09:12:23 by Per Hedbor <ph@opera.com>

• 5ea1d9e1b46ed49c78678624d0957f6fa81f1dd8 (20 lines) (+20/-0) ^{[ Show | Annotate ]}
  Branch: 7.9

[compiler] Added ADD_LOCAL_INT to complement ADD_LOCAL_INT_AND_POP.

Also, do quick return for return UNDEFINED.

550:    }   });    + OPCODE2(F_ADD_LOCAL_INT, "local += number local", 0,{ +  struct svalue *dst = Pike_fp->locals+arg1; +  if( dst->type == PIKE_T_INT +  DO_IF_BIGNUM( +  &&(!INT_TYPE_ADD_OVERFLOW(dst->u.integer,arg2)))) +  { +  SET_SVAL_SUBTYPE(*dst,NUMBER_NUMBER); +  dst->u.integer += arg2; +  push_int( dst->u.integer ); +  } +  else +  { +  push_svalue( dst ); +  push_int( arg2 ); +  f_add(2); +  assign_svalue( Pike_fp->locals+arg1,Pike_sp-1); +  } + }); +    OPCODE1(F_INC_LOCAL, "++local", I_UPDATE_SP, {    if( (TYPEOF(Pike_fp->locals[arg1]) == PIKE_T_INT)    DO_IF_BIGNUM(