From 09eae5ceb2e9e7e509864091e2400af4ca3bfce1 Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Sat, 13 Apr 2013 10:03:34 +0900 Subject: move no block check to mrb_yield_internal --- src/vm.c | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/vm.c') diff --git a/src/vm.c b/src/vm.c index 13058fc28..9224c7a40 100644 --- a/src/vm.c +++ b/src/vm.c @@ -392,6 +392,9 @@ mrb_yield_internal(mrb_state *mrb, mrb_value b, int argc, mrb_value *argv, mrb_v int n = mrb->ci->nregs; mrb_value val; + if (mrb_nil_p(b)) { + mrb_raise(mrb, E_ARGUMENT_ERROR, "no block given"); + } p = mrb_proc_ptr(b); ci = cipush(mrb); ci->mid = mid; -- cgit v1.2.3