check if block is given in eval_under(); fix #2486

1b5584b3 · Yukihiro "Matz" Matsumoto · 6d742ef9 · 1b5584b3
Commit 1b5584b3 authored Jul 23, 2014 by Yukihiro "Matz" Matsumoto
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 0 deletions

src/vm.c src/vm.c +3 -0

No files found.
--- a/src/vm.c
+++ b/src/vm.c
@@ -484,6 +484,9 @@ eval_under(mrb_state *mrb, mrb_value self, mrb_value blk, struct RClass *c)
  struct RProc *p;
  mrb_callinfo *ci;

+  if (mrb_nil_p(blk)) {
+    mrb_raise(mrb, E_ARGUMENT_ERROR, "no block given");
+  }
  ci = mrb->c->ci;
  if (ci->acc == CI_ACC_DIRECT) {
    return mrb_yield_with_class(mrb, blk, 0, 0, self, c);