summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorakr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2013-07-29 13:18:46 +0000
committerakr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2013-07-29 13:18:46 +0000
commit16bf45bf38d5b7ce3024c3af324921da1e6ef07d (patch)
tree0364d9d0a61e449eed9dcc5acbf792514c83d697
parent3118deb3ee40e7b1bc814482de1679ff2c0b9f97 (diff)
* bignum.c (LOG2_KARATSUBA_BIG2STR_DIGITS): Renamed from
LOG2_KARATSUBA_DIGITS. (KARATSUBA_BIG2STR_DIGITS): Renamed from KARATSUBA_DIGITS. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42240 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r--ChangeLog6
-rw-r--r--bignum.c18
2 files changed, 15 insertions, 9 deletions
diff --git a/ChangeLog b/ChangeLog
index 96d1f92299..89bfa0a74b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+Mon Jul 29 22:16:11 2013 Tanaka Akira <akr@fsij.org>
+
+ * bignum.c (LOG2_KARATSUBA_BIG2STR_DIGITS): Renamed from
+ LOG2_KARATSUBA_DIGITS.
+ (KARATSUBA_BIG2STR_DIGITS): Renamed from KARATSUBA_DIGITS.
+
Mon Jul 29 22:04:45 2013 Masaki Matsushita <glass.saga@gmail.com>
* hash.c (rb_hash_compare_by_id): add function prototype.
diff --git a/bignum.c b/bignum.c
index 1f3f4b4169..d2973a5135 100644
--- a/bignum.c
+++ b/bignum.c
@@ -4080,8 +4080,8 @@ big_rshift(VALUE x, unsigned long shift)
return big_shift3(x, 0, s1, s2);
}
-#define LOG2_KARATSUBA_DIGITS 7
-#define KARATSUBA_DIGITS (1L<<LOG2_KARATSUBA_DIGITS)
+#define LOG2_KARATSUBA_BIG2STR_DIGITS 7
+#define KARATSUBA_BIG2STR_DIGITS (1L<<LOG2_KARATSUBA_BIG2STR_DIGITS)
#define MAX_BIG2STR_TABLE_ENTRIES 64
static VALUE big2str_power_cache[35][MAX_BIG2STR_TABLE_ENTRIES];
@@ -4102,7 +4102,7 @@ power_cache_get_power0(int base, int i)
{
if (NIL_P(big2str_power_cache[base - 2][i])) {
big2str_power_cache[base - 2][i] =
- i == 0 ? rb_big_pow(rb_int2big(base), INT2FIX(KARATSUBA_DIGITS))
+ i == 0 ? rb_big_pow(rb_int2big(base), INT2FIX(KARATSUBA_BIG2STR_DIGITS))
: bigsq(power_cache_get_power0(base, i - 1));
rb_gc_register_mark_object(big2str_power_cache[base - 2][i]);
}
@@ -4116,17 +4116,17 @@ power_cache_get_power(int base, long n1, long* m1)
long j;
VALUE t;
- if (n1 <= KARATSUBA_DIGITS)
- rb_bug("n1 > KARATSUBA_DIGITS");
+ if (n1 <= KARATSUBA_BIG2STR_DIGITS)
+ rb_bug("n1 > KARATSUBA_BIG2STR_DIGITS");
m = bitsize(n1-1); /* ceil(log2(n1)) */
if (m1) *m1 = 1 << m;
- i = m - LOG2_KARATSUBA_DIGITS;
+ i = m - LOG2_KARATSUBA_BIG2STR_DIGITS;
if (i >= MAX_BIG2STR_TABLE_ENTRIES)
i = MAX_BIG2STR_TABLE_ENTRIES - 1;
t = power_cache_get_power0(base, i);
- j = KARATSUBA_DIGITS*(1 << i);
+ j = KARATSUBA_BIG2STR_DIGITS*(1 << i);
while (n1 > j) {
t = bigsq(t);
j *= 2;
@@ -4233,7 +4233,7 @@ big2str_karatsuba(VALUE x, int base, char* ptr,
}
}
- if (n1 <= KARATSUBA_DIGITS) {
+ if (n1 <= KARATSUBA_BIG2STR_DIGITS) {
return big2str_orig(x, base, ptr, len, hbase, hbase_numdigits, trim);
}
@@ -4318,7 +4318,7 @@ rb_big2str1(VALUE x, int base, int trim)
off = !(trim && RBIGNUM_SIGN(x)); /* erase plus sign if trim */
xx = rb_big_clone(x);
RBIGNUM_SET_SIGN(xx, 1);
- if (n1 <= KARATSUBA_DIGITS) {
+ if (n1 <= KARATSUBA_BIG2STR_DIGITS) {
len = off + big2str_orig(xx, base, ptr + off, n2, hbase, hbase_numdigits, trim);
}
else {