diff options
Diffstat (limited to 'numeric.c')
-rw-r--r-- | numeric.c | 33 |
1 files changed, 13 insertions, 20 deletions
@@ -211,25 +211,6 @@ num_coerce(VALUE x, VALUE y) return rb_assoc_new(y, x); } -static VALUE -coerce_body(VALUE *x) -{ - return rb_funcall(x[1], id_coerce, 1, x[0]); -} - -static VALUE -coerce_rescue(VALUE *x) -{ - volatile VALUE v = rb_inspect(x[1]); - - rb_raise(rb_eTypeError, "%s can't be coerced into %s", - rb_special_const_p(x[1])? - RSTRING_PTR(v): - rb_obj_classname(x[1]), - rb_obj_classname(x[0])); - return Qnil; /* dummy */ -} - static int do_coerce(VALUE *x, VALUE *y, int err) { @@ -238,7 +219,19 @@ do_coerce(VALUE *x, VALUE *y, int err) a[0] = *x; a[1] = *y; - ary = rb_rescue(coerce_body, (VALUE)a, err?coerce_rescue:0, (VALUE)a); + ary = rb_check_funcall(*y, id_coerce, 1, x); + if (ary == Qundef) { + if (err) { + volatile VALUE v = rb_inspect(*y); + rb_raise(rb_eTypeError, "%s can't be coerced into %s", + rb_special_const_p(*y)? + RSTRING_PTR(v): + rb_obj_classname(*y), + rb_obj_classname(*x)); + } + return FALSE; /* dummy */ + } + if (!RB_TYPE_P(ary, T_ARRAY) || RARRAY_LEN(ary) != 2) { if (err) { rb_raise(rb_eTypeError, "coerce must return [x, y]"); |