1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/ext/-test-/exception/ensured.c

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

40 lines
697 B
C
Raw Normal View History

#include <ruby.h>
static VALUE
begin(VALUE object)
{
return rb_funcall(object, rb_intern("try_method"), 0);
}
static VALUE
ensure(VALUE object)
{
return rb_funcall(object, rb_intern("ensured_method"), 0);
}
static VALUE
ensured(VALUE module, VALUE object)
{
return rb_ensure(begin, object, ensure, object);
}
static VALUE
exc_raise(VALUE exc)
{
rb_exc_raise(exc);
return Qnil;
}
static VALUE
ensure_raise(VALUE module, VALUE object, VALUE exc)
{
return rb_ensure(rb_yield, object, exc_raise, exc);
}
void
Init_ensured(VALUE klass)
{
rb_define_module_function(klass, "ensured", ensured, 1);
rb_define_module_function(klass, "ensure_raise", ensure_raise, 2);
}