The block argument offset saved in the env was wrong; fix #3768

When the method takes variable number of argument (`argc = -1`),
the block argument offset should be `-1` not `0`.

1 files changed, 1 insertions, 0 deletions

diff --git a/src/vm.c b/src/vm.c
index 3eced7e89..970753a7c 100644
--- a/src/vm.c
+++ b/src/vm.c
@@ -289,6 +289,7 @@ mrb_env_unshare(mrb_state *mrb, struct REnv *e)
     if (!e->c) {
       /* save block argument position (negated) */
       e->cioff = -e->cxt.c->cibase[cioff].argc-1;
+      if (e->cioff == 0) e->cioff = -1;
     }
     e->cxt.mid = e->cxt.c->cibase[cioff].mid;
     p = (mrb_value *)mrb_malloc(mrb, sizeof(mrb_value)*len);