Wrong blkargs pos for vararg; ref #3768

1 files changed, 1 insertions, 1 deletions

diff --git a/src/vm.c b/src/vm.c
index 970753a7c..f1dc471cc 100644
--- a/src/vm.c
+++ b/src/vm.c
@@ -289,7 +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;
+      if (e->cioff == 0) e->cioff = -2; /* blkarg position for vararg (1:args, 2:blk) */
     }
     e->cxt.mid = e->cxt.c->cibase[cioff].mid;
     p = (mrb_value *)mrb_malloc(mrb, sizeof(mrb_value)*len);