diff options
Diffstat (limited to 'spec/ruby/optional/capi/ext/exception_spec.c')
| -rw-r--r-- | spec/ruby/optional/capi/ext/exception_spec.c | 68 |
1 files changed, 40 insertions, 28 deletions
diff --git a/spec/ruby/optional/capi/ext/exception_spec.c b/spec/ruby/optional/capi/ext/exception_spec.c index b37f74f03e..c3b94d7bcd 100644 --- a/spec/ruby/optional/capi/ext/exception_spec.c +++ b/spec/ruby/optional/capi/ext/exception_spec.c @@ -8,63 +8,75 @@ extern "C" { #endif -#ifdef HAVE_RB_EXC_NEW +VALUE exception_spec_rb_errinfo(VALUE self) { + return rb_errinfo(); +} + VALUE exception_spec_rb_exc_new(VALUE self, VALUE str) { char *cstr = StringValuePtr(str); return rb_exc_new(rb_eException, cstr, strlen(cstr)); } -#endif -#ifdef HAVE_RB_EXC_NEW2 VALUE exception_spec_rb_exc_new2(VALUE self, VALUE str) { char *cstr = StringValuePtr(str); return rb_exc_new2(rb_eException, cstr); } -#endif -#ifdef HAVE_RB_EXC_NEW3 VALUE exception_spec_rb_exc_new3(VALUE self, VALUE str) { return rb_exc_new3(rb_eException, str); } -#endif -#ifdef HAVE_RB_EXC_RAISE VALUE exception_spec_rb_exc_raise(VALUE self, VALUE exc) { - if (self != Qundef) rb_exc_raise(exc); + if (self != Qundef) rb_exc_raise(exc); return Qnil; } -#endif -#ifdef HAVE_RB_SET_ERRINFO VALUE exception_spec_rb_set_errinfo(VALUE self, VALUE exc) { rb_set_errinfo(exc); return Qnil; } -#endif -void Init_exception_spec(void) { - VALUE cls; - cls = rb_define_class("CApiExceptionSpecs", rb_cObject); +NORETURN(VALUE exception_spec_rb_error_frozen_object(VALUE self, VALUE object)); -#ifdef HAVE_RB_EXC_NEW - rb_define_method(cls, "rb_exc_new", exception_spec_rb_exc_new, 1); -#endif +VALUE exception_spec_rb_error_frozen_object(VALUE self, VALUE object) { + rb_error_frozen_object(object); + UNREACHABLE_RETURN(Qnil); +} -#ifdef HAVE_RB_EXC_NEW2 - rb_define_method(cls, "rb_exc_new2", exception_spec_rb_exc_new2, 1); -#endif +VALUE exception_spec_rb_syserr_new(VALUE self, VALUE num, VALUE msg) { + int n = NUM2INT(num); + char *cstr = NULL; -#ifdef HAVE_RB_EXC_NEW3 - rb_define_method(cls, "rb_exc_new3", exception_spec_rb_exc_new3, 1); -#endif + if (msg != Qnil) { + cstr = StringValuePtr(msg); + } -#ifdef HAVE_RB_EXC_RAISE - rb_define_method(cls, "rb_exc_raise", exception_spec_rb_exc_raise, 1); -#endif + return rb_syserr_new(n, cstr); +} + +VALUE exception_spec_rb_syserr_new_str(VALUE self, VALUE num, VALUE msg) { + int n = NUM2INT(num); + return rb_syserr_new_str(n, msg); +} + +VALUE exception_spec_rb_make_exception(VALUE self, VALUE ary) { + int argc = RARRAY_LENINT(ary); + VALUE *argv = RARRAY_PTR(ary); + return rb_make_exception(argc, argv); +} -#ifdef HAVE_RB_SET_ERRINFO +void Init_exception_spec(void) { + VALUE cls = rb_define_class("CApiExceptionSpecs", rb_cObject); + rb_define_method(cls, "rb_errinfo", exception_spec_rb_errinfo, 0); + rb_define_method(cls, "rb_exc_new", exception_spec_rb_exc_new, 1); + rb_define_method(cls, "rb_exc_new2", exception_spec_rb_exc_new2, 1); + rb_define_method(cls, "rb_exc_new3", exception_spec_rb_exc_new3, 1); + rb_define_method(cls, "rb_exc_raise", exception_spec_rb_exc_raise, 1); rb_define_method(cls, "rb_set_errinfo", exception_spec_rb_set_errinfo, 1); -#endif + rb_define_method(cls, "rb_error_frozen_object", exception_spec_rb_error_frozen_object, 1); + rb_define_method(cls, "rb_syserr_new", exception_spec_rb_syserr_new, 2); + rb_define_method(cls, "rb_syserr_new_str", exception_spec_rb_syserr_new_str, 2); + rb_define_method(cls, "rb_make_exception", exception_spec_rb_make_exception, 1); } #ifdef __cplusplus |
