pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:2152:    {    DO_IF_DEBUG(Pike_fp->next->pc=0);    unlink_previous_frame();    DO_JUMP_TO(addr);    }else{    DO_DUMB_RETURN;    }    });      OPCODE1_JUMP(F_MARK_CALL_LFUN, "mark, call lfun" , I_UPDATE_ALL, { -  LOCAL_VAR(PIKE_OPCODE_T *p); +  LOCAL_VAR(PIKE_OPCODE_T *addr);    JUMP_SET_TO_PC_AT_NEXT (Pike_fp->return_addr); -  if((p = lower_mega_apply(0, Pike_fp->current_object, +  if((addr = lower_mega_apply(0, Pike_fp->current_object,    (arg1+Pike_fp->context->identifier_level)))) {    Pike_fp->flags |= PIKE_FRAME_RETURN_INTERNAL; -  DO_JUMP_TO(p); +  DO_JUMP_TO(addr);    } else {    DO_JUMP_TO_NEXT;    }    });      OPCODE1_JUMP( F_MARK_CALL_LFUN_AND_POP , "mark, call lfun & pop", I_UPDATE_ALL, { -  LOCAL_VAR(PIKE_OPCODE_T *p); +  LOCAL_VAR(PIKE_OPCODE_T *addr);    JUMP_SET_TO_PC_AT_NEXT (Pike_fp->return_addr); -  if((p = lower_mega_apply(0, Pike_fp->current_object, +  if((addr = lower_mega_apply(0, Pike_fp->current_object,    (arg1+Pike_fp->context->identifier_level) )))    {    Pike_fp->flags |= PIKE_FRAME_RETURN_INTERNAL | PIKE_FRAME_RETURN_POP; -  DO_JUMP_TO(p); +  DO_JUMP_TO(addr);    }    else    {    pop_stack();    DO_JUMP_TO_NEXT;    }    });      OPCODE1_RETURN(F_MARK_CALL_LFUN_AND_RETURN , "mark, call lfun & return", I_UPDATE_ALL, {    LOCAL_VAR(PIKE_OPCODE_T *addr);
pike.git/src/interpret_functions.h:2237:    stack_pop_keep_top();    DO_JUMP_TO_NEXT;    }    }    }    }       {    LOCAL_VAR(struct svalue tmp);    LOCAL_VAR(struct svalue tmp2); -  LOCAL_VAR(PIKE_OPCODE_T *p); +  LOCAL_VAR(PIKE_OPCODE_T *addr);    SET_SVAL(tmp, PIKE_T_STRING, 1, string,    Pike_fp->context->prog->strings[arg1]);       index_no_free(&tmp2, s, &tmp);    free_svalue(s);    move_svalue (s, &tmp2);    print_return_value();    -  if((p = low_mega_apply(APPLY_STACK, args, 0, 0))) +  if((addr = low_mega_apply(APPLY_STACK, args, 0, 0)))    {    Pike_fp->flags |= PIKE_FRAME_RETURN_INTERNAL; -  DO_JUMP_TO(p); +  DO_JUMP_TO(addr);    }    else {    DO_JUMP_TO_NEXT;    }    }   });      OPCODE1_JUMP(F_CALL_OTHER_AND_POP,"call other & pop", I_UPDATE_ALL, {    INT32 args=DO_NOT_WARN((INT32)(Pike_sp - *--Pike_mark_sp));    LOCAL_VAR(struct svalue *s);
pike.git/src/interpret_functions.h:2297:    pop_2_elems();    DO_JUMP_TO_NEXT;    }    }    }    }       {    LOCAL_VAR(struct svalue tmp);    LOCAL_VAR(struct svalue tmp2); -  LOCAL_VAR(PIKE_OPCODE_T *p); +  LOCAL_VAR(PIKE_OPCODE_T *addr);       SET_SVAL(tmp, PIKE_T_STRING, 1, string,    Pike_fp->context->prog->strings[arg1]);       index_no_free(&tmp2, s, &tmp);    free_svalue(s);    move_svalue (s, &tmp2);    print_return_value();    -  if((p = low_mega_apply(APPLY_STACK, args, 0, 0))) +  if((addr = low_mega_apply(APPLY_STACK, args, 0, 0)))    {    Pike_fp->flags |= PIKE_FRAME_RETURN_INTERNAL | PIKE_FRAME_RETURN_POP; -  DO_JUMP_TO(p); +  DO_JUMP_TO(addr);    }    else {    pop_stack();    DO_JUMP_TO_NEXT;    }    }   });      OPCODE1_RETURN(F_CALL_OTHER_AND_RETURN,"call other & return", I_UPDATE_ALL, {    INT32 args=DO_NOT_WARN((INT32)(Pike_sp - *--Pike_mark_sp));
pike.git/src/interpret_functions.h:2357:    stack_pop_keep_top();    DO_DUMB_RETURN;    }    }    }    }       {    LOCAL_VAR(struct svalue tmp);    LOCAL_VAR(struct svalue tmp2); -  LOCAL_VAR(PIKE_OPCODE_T *p); +  LOCAL_VAR(PIKE_OPCODE_T *addr);    SET_SVAL(tmp, PIKE_T_STRING, 1, string,    Pike_fp->context->prog->strings[arg1]);       index_no_free(&tmp2, s, &tmp);    free_svalue(s);    move_svalue (s, &tmp2);    print_return_value();    -  if((p = low_mega_apply(APPLY_STACK, args, 0, 0))) +  if((addr = low_mega_apply(APPLY_STACK, args, 0, 0)))    {    DO_IF_DEBUG(Pike_fp->next->pc=0);    unlink_previous_frame(); -  DO_JUMP_TO(p); +  DO_JUMP_TO(addr);    }    DO_DUMB_RETURN;    }   });      #undef DO_CALL_BUILTIN   #ifdef PIKE_DEBUG   #define DO_CALL_BUILTIN(ARGS) do { \    int args_=(ARGS); \    struct svalue *expected_stack=Pike_sp-args_; \