Ensure size of the stack in OP_CALL.

matz · matz · commit af6041f1d09f · 2017-06-15T13:36:36.000+09:00
diff --git a/src/vm.c b/src/vm.c
@@ -1434,14 +1434,13 @@ mrb_vm_exec(mrb_state *mrb, struct RProc *proc, mrb_code *pc)
         pool = irep->pool;
         syms = irep->syms;
         ci->nregs = irep->nregs;
+        stack_extend(mrb, irep->nregs);
         if (ci->argc < 0) {
           if (irep->nregs > 3) {
-            stack_extend(mrb, irep->nregs);
             stack_clear(regs+3, irep->nregs-3);
           }
         }
         else if (ci->argc+2 < irep->nregs) {
-          stack_extend(mrb, irep->nregs);
           stack_clear(regs+ci->argc+2, irep->nregs-ci->argc-2);
         }
         if (m->env) {

Original file line number	Diff line number	Diff line change
`@@ -1434,14 +1434,13 @@ mrb_vm_exec(mrb_state mrb, struct RProc proc, mrb_code *pc)`
`1434`	`1434`	`pool = irep->pool;`
`1435`	`1435`	`syms = irep->syms;`
`1436`	`1436`	`ci->nregs = irep->nregs;`
	`1437`	`+ stack_extend(mrb, irep->nregs);`
`1437`	`1438`	`if (ci->argc < 0) {`
`1438`	`1439`	`if (irep->nregs > 3) {`
`1439`		`- stack_extend(mrb, irep->nregs);`
`1440`	`1440`	`stack_clear(regs+3, irep->nregs-3);`
`1441`	`1441`	`}`
`1442`	`1442`	`}`
`1443`	`1443`	`else if (ci->argc+2 < irep->nregs) {`
`1444`		`- stack_extend(mrb, irep->nregs);`
`1445`	`1444`	`stack_clear(regs+ci->argc+2, irep->nregs-ci->argc-2);`
`1446`	`1445`	`}`
`1447`	`1446`	`if (m->env) {`