mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
* numeric.c (do_coerce): fix for the exceptions which the coerce
method raises. The optimization done by r38756 is preserved. [Bug #7645] [ruby-core:51213] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@38792 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
8d816aef2e
commit
350c448da8
2 changed files with 32 additions and 8 deletions
|
@ -1,3 +1,9 @@
|
|||
Sat Jan 12 17:42:00 2013 Kenta Murata <mrkn@cookpad.com>
|
||||
|
||||
* numeric.c (do_coerce): fix for the exceptions which the coerce
|
||||
method raises. The optimization done by r38756 is preserved.
|
||||
[Bug #7645] [ruby-core:51213]
|
||||
|
||||
Sat Jan 12 16:12:46 2013 Nobuyoshi Nakada <nobu@ruby-lang.org>
|
||||
|
||||
* win32/setup.mak (-runtime-): see msvcrt from link header on mswin
|
||||
|
|
34
numeric.c
34
numeric.c
|
@ -211,24 +211,42 @@ 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)
|
||||
{
|
||||
VALUE ary;
|
||||
VALUE a[2];
|
||||
|
||||
ary = rb_check_funcall(*y, id_coerce, 1, x);
|
||||
if (ary == Qundef) {
|
||||
a[0] = *x; a[1] = *y;
|
||||
|
||||
if (!rb_respond_to(*y, id_coerce)) {
|
||||
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));
|
||||
coerce_rescue(a);
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
ary = rb_rescue(coerce_body, (VALUE)a, err ? coerce_rescue : 0, (VALUE)a);
|
||||
if (!RB_TYPE_P(ary, T_ARRAY) || RARRAY_LEN(ary) != 2) {
|
||||
if (err) {
|
||||
rb_raise(rb_eTypeError, "coerce must return [x, y]");
|
||||
|
|
Loading…
Reference in a new issue