pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:420:    union anything *tmp;    LOCAL_VAR(struct object *o);    o = Pike_fp->current_object;    if(!o->prog) /* note: generate an error. */    object_low_set_index(o,0,0);    tmp = (union anything *)(o->storage + Pike_fp->context->storage_offset + arg1);    assign_to_short_svalue( tmp, arg2, Pike_sp-1);   });       + #if SIZEOF_FLOAT_TYPE != SIZEOF_INT_TYPE + #define DO_IF_ELSE_SIZEOF_FLOAT_INT(EQ, NEQ) do { NEQ; } while(0) + #else + #define DO_IF_ELSE_SIZEOF_FLOAT_INT(EQ, NEQ) do { EQ; } while(0) + #endif +    OPCODE2(F_PRIVATE_TYPED_GLOBAL, "global <private,typed>", I_UPDATE_SP, {    void *ptr;    LOCAL_VAR(struct object *o);       o = Pike_fp->current_object;    ptr = (void *)(o->storage + Pike_fp->context->storage_offset + arg1);    if( arg2 < MIN_REF_TYPE )    { - #if SIZEOF_FLOAT_TYPE != SIZEOF_INT_TYPE +  DO_IF_ELSE_SIZEOF_FLOAT_INT(    if( UNLIKELY(arg2)==PIKE_T_INT )    push_int( *(INT_TYPE*)ptr );    else -  push_float( *(FLOAT_TYPE*)ptr ); - #else +  push_float( *(FLOAT_TYPE*)ptr ) +  ,    SET_SVAL_TYPE_SUBTYPE(Pike_sp[0],arg2,0);    Pike_sp[0].u.integer = *(INT_TYPE*)ptr; -  Pike_sp++; - #endif +  Pike_sp++ +  );    }    else    {    INT32 *refs = *(INT32**)ptr;    if( !refs )    push_undefined();    else    {    struct svalue tmp;    SET_SVAL_TYPE_SUBTYPE(tmp,arg2,0);