Merge pull request #2204 from take-cheeze/kernel_fail

Implement Kernel.fail and Kernel#fail .

3 files changed, 24 insertions, 0 deletions

diff --git a/mrbgems/mruby-kernel-ext/mrbgem.rake b/mrbgems/mruby-kernel-ext/mrbgem.rake
new file mode 100644
index 000000000..ab610c02b
--- /dev/null
+++ b/mrbgems/mruby-kernel-ext/mrbgem.rake
@@ -0,0 +1,5 @@
+MRuby::Gem::Specification.new('mruby-kernel-ext') do |spec|
+  spec.license = 'MIT'
+  spec.author  = 'mruby developers'
+  spec.summary = 'extensional Kernel module'
+end
diff --git a/mrbgems/mruby-kernel-ext/src/kernel.c b/mrbgems/mruby-kernel-ext/src/kernel.c
new file mode 100644
index 000000000..640b62e65
--- /dev/null
+++ b/mrbgems/mruby-kernel-ext/src/kernel.c
@@ -0,0 +1,15 @@
+#include <mruby.h>
+#include <mruby/error.h>
+
+void
+mrb_mruby_kernel_ext_gem_init(mrb_state *mrb)
+{
+  struct RClass *krn = mrb->kernel_module;
+
+  mrb_define_module_function(mrb, krn, "fail", mrb_f_raise, MRB_ARGS_NONE());
+}
+
+void
+mrb_mruby_kernel_ext_gem_final(mrb_state *mrb)
+{
+}
diff --git a/mrbgems/mruby-kernel-ext/test/kernel.rb b/mrbgems/mruby-kernel-ext/test/kernel.rb
new file mode 100644
index 000000000..97ef95d54
--- /dev/null
+++ b/mrbgems/mruby-kernel-ext/test/kernel.rb
@@ -0,0 +1,4 @@
+assert('Kernel.fail, Kernel#fail') do
+  assert_raise(RuntimeError) { fail }
+  assert_raise(RuntimeError) { Kernel.fail }
+end