stack_extend in mrb_f_send

mrb_f_send needs stack_extend like OP_SEND

Signed-off-by: Go Saito <[email protected]>

1 files changed, 7 insertions, 0 deletions

diff --git a/src/vm.c b/src/vm.c
index 7f3a3c151..390fdddea 100644
--- a/src/vm.c
+++ b/src/vm.c
@@ -472,6 +472,13 @@ mrb_f_send(mrb_state *mrb, mrb_value self)
     return p->body.func(mrb, self);
   }
 
+  if (ci->argc < 0) {
+    stack_extend(mrb, (p->body.irep->nregs < 3) ? 3 : p->body.irep->nregs, 3);
+  }
+  else {
+    stack_extend(mrb, p->body.irep->nregs, ci->argc+2);
+  }
+
   ci->nregs = p->body.irep->nregs;
   ci = cipush(mrb);
   ci->nregs = 0;