Range optimization. similar to #348

This commit is contained in:
Masaki Muranaka
2012-07-07 09:23:00 +09:00
parent 8268ba2755
commit e896c1cee3
+8 -7
View File
@@ -199,27 +199,28 @@ r_le(mrb_state *mrb, mrb_value a, mrb_value b)
static int
r_gt(mrb_state *mrb, mrb_value a, mrb_value b)
{
//int c;
mrb_value r = mrb_funcall(mrb, a, "<=>", 1, b);
/* output :a < b => -1, a = b => 0, a > b => +1 */
if (mrb_nil_p(r)) return FALSE;
if (mrb_type(r) == MRB_TT_FIXNUM) {
int c = mrb_fixnum(r);
if (c == 1) return TRUE;
}
if (mrb_obj_equal(mrb, r, mrb_fixnum_value(1))) return TRUE;
return FALSE;
}
static int
r_ge(mrb_state *mrb, mrb_value a, mrb_value b)
{
//int c;
mrb_value r = mrb_funcall(mrb, a, "<=>", 1, b); /* compare result */
/* output :a < b => -1, a = b => 0, a > b => +1 */
if (mrb_nil_p(r)) return FALSE;
if (mrb_type(r) == MRB_TT_FIXNUM) {
int c = mrb_fixnum(r);
if (c == 0 || c == 1) return TRUE;
}
if (mrb_obj_equal(mrb, r, mrb_fixnum_value(0))) return TRUE;
if (mrb_obj_equal(mrb, r, mrb_fixnum_value(1))) return TRUE;
return FALSE;
}