From 98a610831a6f73c48bfc1608c3bb4f6a047f753e Mon Sep 17 00:00:00 2001 From: take_cheeze Date: Tue, 6 May 2014 21:29:35 +0900 Subject: Implement Kernel.fail and Kernel#fail . --- src/kernel.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/kernel.c') diff --git a/src/kernel.c b/src/kernel.c index 4db8ad7ee..c345ecbd1 100644 --- a/src/kernel.c +++ b/src/kernel.c @@ -1189,6 +1189,8 @@ mrb_init_kernel(mrb_state *mrb) mrb_define_method(mrb, krn, "to_s", mrb_any_to_s, MRB_ARGS_NONE()); /* 15.3.1.3.46 */ mrb_define_method(mrb, krn, "__case_eqq", mrb_obj_ceqq, MRB_ARGS_REQ(1)); /* internal */ + mrb_define_module_function(mrb, krn, "fail", mrb_f_raise, MRB_ARGS_NONE()); + mrb_include_module(mrb, mrb->object_class, mrb->kernel_module); mrb_alias_method(mrb, mrb->module_class, mrb_intern_lit(mrb, "dup"), mrb_intern_lit(mrb, "clone")); } -- cgit v1.2.3