* numeric.c (rb_num_coerce_relop): export function.

* marshal.c (w_object): check has been dropped. "_dump must return
  string." [ruby-dev:21024]


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4243 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 2003-07-31 08:42:44 +00:00
parent 7126624b4e
commit 5b9afca5e4
7 changed files with 91 additions and 83 deletions

View file

@ -144,8 +144,8 @@ rb_num_coerce_cmp(x, y)
return Qnil;
}
static VALUE
num_coerce_relop(x, y)
VALUE
rb_num_coerce_relop(x, y)
VALUE x, y;
{
VALUE c, x0 = x, y0 = y;
@ -620,7 +620,7 @@ flo_gt(x, y)
break;
default:
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
if (isnan(a) || isnan(b)) return Qfalse;
return (a > b)?Qtrue:Qfalse;
@ -647,7 +647,7 @@ flo_ge(x, y)
break;
default:
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
if (isnan(a) || isnan(b)) return Qfalse;
return (a >= b)?Qtrue:Qfalse;
@ -674,7 +674,7 @@ flo_lt(x, y)
break;
default:
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
if (isnan(a) || isnan(b)) return Qfalse;
return (a < b)?Qtrue:Qfalse;
@ -701,7 +701,7 @@ flo_le(x, y)
break;
default:
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
if (isnan(a) || isnan(b)) return Qfalse;
return (a <= b)?Qtrue:Qfalse;
@ -1501,7 +1501,7 @@ fix_gt(x, y)
return Qfalse;
}
else {
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
}
@ -1516,7 +1516,7 @@ fix_ge(x, y)
return Qfalse;
}
else {
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
}
@ -1531,7 +1531,7 @@ fix_lt(x, y)
return Qfalse;
}
else {
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
}
@ -1546,7 +1546,7 @@ fix_le(x, y)
return Qfalse;
}
else {
return num_coerce_relop(x, y);
return rb_num_coerce_relop(x, y);
}
}