diff options
-rw-r--r-- | complex.c | 8 | ||||
-rw-r--r-- | internal.h | 4 | ||||
-rw-r--r-- | numeric.c | 4 |
3 files changed, 8 insertions, 8 deletions
@@ -715,11 +715,11 @@ f_addsub(VALUE self, VALUE other, * Complex(20, 9) + 9.8 #=> (29.8+9i) */ VALUE -rb_nucomp_add(VALUE self, VALUE other) +rb_complex_plus(VALUE self, VALUE other) { return f_addsub(self, other, f_add, '+'); } -#define nucomp_add rb_nucomp_add +#define nucomp_add rb_complex_plus /* * call-seq: @@ -765,7 +765,7 @@ safe_mul(VALUE a, VALUE b, int az, int bz) * Complex(20, 9) * 9.8 #=> (196.0+88.2i) */ VALUE -rb_nucomp_mul(VALUE self, VALUE other) +rb_complex_mul(VALUE self, VALUE other) { if (k_complex_p(other)) { VALUE real, imag; @@ -794,7 +794,7 @@ rb_nucomp_mul(VALUE self, VALUE other) } return rb_num_coerce_bin(self, other, '*'); } -#define nucomp_mul rb_nucomp_mul +#define nucomp_mul rb_complex_mul inline static VALUE f_divide(VALUE self, VALUE other, diff --git a/internal.h b/internal.h index f23d7e2be0..1a75532e79 100644 --- a/internal.h +++ b/internal.h @@ -901,8 +901,8 @@ CONSTFUNC(const char * rb_insns_name(int i)); VALUE rb_insns_name_array(void); /* complex.c */ -VALUE rb_nucomp_add(VALUE, VALUE); -VALUE rb_nucomp_mul(VALUE, VALUE); +VALUE rb_complex_plus(VALUE, VALUE); +VALUE rb_complex_mul(VALUE, VALUE); /* cont.c */ VALUE rb_obj_is_fiber(VALUE); @@ -3240,7 +3240,7 @@ fix_plus(VALUE x, VALUE y) return DBL2NUM((double)FIX2LONG(x) + RFLOAT_VALUE(y)); } else if (RB_TYPE_P(y, T_COMPLEX)) { - return rb_nucomp_add(y, x); + return rb_complex_plus(y, x); } else { return rb_num_coerce_bin(x, y, '+'); @@ -3342,7 +3342,7 @@ fix_mul(VALUE x, VALUE y) return DBL2NUM((double)FIX2LONG(x) * RFLOAT_VALUE(y)); } else if (RB_TYPE_P(y, T_COMPLEX)) { - return rb_nucomp_mul(y, x); + return rb_complex_mul(y, x); } else { return rb_num_coerce_bin(x, y, '*'); |