1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Replaced f_odd_p with rb_int_odd_p

Browse Source
This commit is contained in:
Nobuyoshi Nakada 2020-05-30 14:59:44 +09:00
parent 68d7e93b3b
commit 29ecce4d72
No known key found for this signature in database
GPG Key ID: 7CD2805BFA3770C6
1 changed files with 1 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
rational.c
View File

@ -965,15 +965,6 @@ nurat_fdiv(VALUE self, VALUE other)
return rb_funcall(div, idTo_f, 0); return rb_funcall(div, idTo_f, 0);
} }
inline static VALUE
f_odd_p(VALUE integer)
{
if (rb_funcall(integer, '%', 1, INT2FIX(2)) != INT2FIX(0)) {
return Qtrue;
}
return Qfalse;
}
/* /*
* call-seq: * call-seq:
* rat ** numeric -> numeric * rat ** numeric -> numeric
@ -1008,7 +999,7 @@ rb_rational_pow(VALUE self, VALUE other)
return f_rational_new_bang1(CLASS_OF(self), ONE); return f_rational_new_bang1(CLASS_OF(self), ONE);
} }
else if (f_minus_one_p(dat->num) && RB_INTEGER_TYPE_P(other)) { else if (f_minus_one_p(dat->num) && RB_INTEGER_TYPE_P(other)) {
return f_rational_new_bang1(CLASS_OF(self), INT2FIX(f_odd_p(other) ? -1 : 1)); return f_rational_new_bang1(CLASS_OF(self), INT2FIX(rb_int_odd_p(other) ? -1 : 1));
} }
else if (INT_ZERO_P(dat->num)) { else if (INT_ZERO_P(dat->num)) {
if (rb_num_negative_p(other)) { if (rb_num_negative_p(other)) {