Branch: Tag:

2016-09-05

2016-09-05 19:51:33 by Arne Goedeke <el@laramies.com>

Interpreter: use Pike_fp->current_storage

369:    struct object *co = Pike_fp->current_object;    if(!co->prog) /* note: generate an error. */    object_low_set_index(co,0,0); -  sp = (struct svalue *)(co->storage + Pike_fp->context->storage_offset + arg1); +  sp = (struct svalue *)(Pike_fp->current_storage + arg1);    push_svalue( sp );    print_return_value();   });
389:    else    {    struct svalue *sp; -  sp = (struct svalue *)(co->storage + cx->storage_offset + arg1); +  sp = (struct svalue *)(Pike_fp->current_storage + arg1);    push_svalue( sp );    print_return_value();    }
408:    else    {    struct svalue *tmp; -  tmp = (struct svalue *)(co->storage + cx->storage_offset + arg1); +  tmp = (struct svalue *)(Pike_fp->current_storage + arg1);    assign_svalue(tmp,Pike_sp-1);    }    });
420:    o = Pike_fp->current_object;    if(!o->prog) /* note: generate an error. */    object_low_set_index(o,0,0); -  tmp_s = (union anything *)(o->storage + Pike_fp->context->storage_offset + arg1); +  tmp_s = (union anything *)(Pike_fp->current_storage + arg1);    assign_to_short_svalue( tmp_s, arg2, Pike_sp-1 );    pop_stack();   });
431:    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); +  tmp = (union anything *)(Pike_fp->current_storage + arg1);    assign_to_short_svalue( tmp, arg2, Pike_sp-1);   });   
447:    LOCAL_VAR(struct object *o);       o = Pike_fp->current_object; -  ptr = (void *)(o->storage + Pike_fp->context->storage_offset + arg1); +  ptr = (void *)(Pike_fp->current_storage + arg1);    if( arg2 < MIN_REF_TYPE )    {    DO_IF_ELSE_SIZEOF_FLOAT_INT(
1228:    co = Pike_fp->current_object;    if(!co->prog) /* note: generate an error. */    object_low_set_index(co,0,0); -  tmp = (struct svalue *)(co->storage + Pike_fp->context->storage_offset + arg1); +  tmp = (struct svalue *)(Pike_fp->current_storage + arg1);    free_svalue(tmp);    *tmp = *--Pike_sp;   });
1239:    co = Pike_fp->current_object;    if(!co->prog) /* note: generate an error. */    object_low_set_index(co,0,0); -  tmp = (struct svalue *)(co->storage +Pike_fp->context->storage_offset +arg1); +  tmp = (struct svalue *)(Pike_fp->current_storage + arg1);    assign_svalue( tmp, Pike_sp-1 );   });