diff options
Diffstat (limited to 'vm_insnhelper.c')
-rw-r--r-- | vm_insnhelper.c | 26 |
1 files changed, 19 insertions, 7 deletions
diff --git a/vm_insnhelper.c b/vm_insnhelper.c index d6cc9f90ef..6e00edde07 100644 --- a/vm_insnhelper.c +++ b/vm_insnhelper.c @@ -1065,13 +1065,13 @@ vm_caller_setup_args(const rb_thread_t *th, rb_control_frame_t *cfp, rb_call_inf } static inline int -vm_callee_setup_keyword_arg(const rb_iseq_t *iseq, int argc, VALUE *orig_argv) +vm_callee_setup_keyword_arg(const rb_iseq_t *iseq, int argc, VALUE *orig_argv, VALUE *kwd) { - VALUE keyword_hash = Qnil; + VALUE keyword_hash; int i, j; - if (argc > 0) keyword_hash = rb_check_hash_type(orig_argv[argc-1]); - if (!NIL_P(keyword_hash)) { + if (argc > 0 && + !NIL_P(keyword_hash = rb_check_hash_type(orig_argv[argc-1]))) { argc--; keyword_hash = rb_hash_dup(keyword_hash); if (iseq->arg_keyword_check) { @@ -1087,7 +1087,7 @@ vm_callee_setup_keyword_arg(const rb_iseq_t *iseq, int argc, VALUE *orig_argv) keyword_hash = rb_hash_new(); } - orig_argv[iseq->arg_keyword] = keyword_hash; + *kwd = keyword_hash; return argc; } @@ -1102,13 +1102,14 @@ vm_callee_setup_arg_complex(rb_thread_t *th, rb_call_info_t *ci, const rb_iseq_t const int orig_argc = ci->argc; int argc = orig_argc; VALUE *argv = orig_argv; + VALUE keyword_hash = Qnil; rb_num_t opt_pc = 0; th->mark_stack_len = argc + iseq->arg_size; /* keyword argument */ if (iseq->arg_keyword != -1) { - argc = vm_callee_setup_keyword_arg(iseq, argc, orig_argv); + argc = vm_callee_setup_keyword_arg(iseq, argc, orig_argv, &keyword_hash); } /* mandatory */ @@ -1154,6 +1155,11 @@ vm_callee_setup_arg_complex(rb_thread_t *th, rb_call_info_t *ci, const rb_iseq_t argc = 0; } + /* keyword argument */ + if (iseq->arg_keyword != -1) { + orig_argv[iseq->arg_keyword] = keyword_hash; + } + /* block arguments */ if (iseq->arg_block != -1) { VALUE blockval = Qnil; @@ -2088,13 +2094,14 @@ vm_yield_setup_block_args(rb_thread_t *th, const rb_iseq_t * iseq, int argc = orig_argc; const int m = iseq->argc; VALUE ary, arg0; + VALUE keyword_hash = Qnil; int opt_pc = 0; th->mark_stack_len = argc; /* keyword argument */ if (iseq->arg_keyword != -1) { - argc = vm_callee_setup_keyword_arg(iseq, argc, argv); + argc = vm_callee_setup_keyword_arg(iseq, argc, argv, &keyword_hash); } /* @@ -2155,6 +2162,11 @@ vm_yield_setup_block_args(rb_thread_t *th, const rb_iseq_t * iseq, th->mark_stack_len = iseq->arg_size; } + /* keyword argument */ + if (iseq->arg_keyword != -1) { + argv[iseq->arg_keyword] = keyword_hash; + } + /* {|&b|} */ if (iseq->arg_block != -1) { VALUE procval = Qnil; |