diff options
Diffstat (limited to 'numeric.c')
-rw-r--r-- | numeric.c | 15 |
1 files changed, 10 insertions, 5 deletions
@@ -832,12 +832,13 @@ flo_eq(x, y) break; case T_FLOAT: b = RFLOAT(y)->value; + if (isnan(b)) return Qfalse; break; default: return num_equal(x, y); } a = RFLOAT(x)->value; - if (isnan(a) || isnan(b)) return Qfalse; + if (isnan(a)) return Qfalse; return (a == b)?Qtrue:Qfalse; } @@ -937,12 +938,13 @@ flo_gt(x, y) case T_FLOAT: b = RFLOAT(y)->value; + if (isnan(b)) return Qfalse; break; default: return rb_num_coerce_relop(x, y); } - if (isnan(a) || isnan(b)) return Qfalse; + if (isnan(a)) return Qfalse; return (a > b)?Qtrue:Qfalse; } @@ -972,12 +974,13 @@ flo_ge(x, y) case T_FLOAT: b = RFLOAT(y)->value; + if (isnan(b)) return Qfalse; break; default: return rb_num_coerce_relop(x, y); } - if (isnan(a) || isnan(b)) return Qfalse; + if (isnan(a)) return Qfalse; return (a >= b)?Qtrue:Qfalse; } @@ -1006,12 +1009,13 @@ flo_lt(x, y) case T_FLOAT: b = RFLOAT(y)->value; + if (isnan(b)) return Qfalse; break; default: return rb_num_coerce_relop(x, y); } - if (isnan(a) || isnan(b)) return Qfalse; + if (isnan(a)) return Qfalse; return (a < b)?Qtrue:Qfalse; } @@ -1041,12 +1045,13 @@ flo_le(x, y) case T_FLOAT: b = RFLOAT(y)->value; + if (isnan(b)) return Qfalse; break; default: return rb_num_coerce_relop(x, y); } - if (isnan(a) || isnan(b)) return Qfalse; + if (isnan(a)) return Qfalse; return (a <= b)?Qtrue:Qfalse; } |