1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00

* bignum.c (MAX_BASE36_POWER_TABLE_ENTRIES): Renamed from

MAX_BIG2STR_TABLE_ENTRIES.
  (base36_power_cache): Renamed from big2str_power_cache.
  (base36_numdigits_cache): Renamed from big2str_numdigits_cache.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42351 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
akr 2013-08-03 04:32:33 +00:00
parent 6660c5fb0c
commit 36c89c484b
2 changed files with 25 additions and 18 deletions

View file

@ -1,3 +1,10 @@
Sat Aug 3 13:30:04 2013 Tanaka Akira <akr@fsij.org>
* bignum.c (MAX_BASE36_POWER_TABLE_ENTRIES): Renamed from
MAX_BIG2STR_TABLE_ENTRIES.
(base36_power_cache): Renamed from big2str_power_cache.
(base36_numdigits_cache): Renamed from big2str_numdigits_cache.
Sat Aug 3 10:33:52 2013 Nobuyoshi Nakada <nobu@ruby-lang.org> Sat Aug 3 10:33:52 2013 Nobuyoshi Nakada <nobu@ruby-lang.org>
* parse.y (parser_set_integer_literal): use rb_rational_raw1() for * parse.y (parser_set_integer_literal): use rb_rational_raw1() for

View file

@ -4108,18 +4108,18 @@ big_rshift(VALUE x, unsigned long shift)
return big_shift3(x, 0, s1, s2); return big_shift3(x, 0, s1, s2);
} }
#define MAX_BIG2STR_TABLE_ENTRIES (SIZEOF_SIZE_T * CHAR_BIT + 1) #define MAX_BASE36_POWER_TABLE_ENTRIES (SIZEOF_SIZE_T * CHAR_BIT + 1)
static VALUE big2str_power_cache[35][MAX_BIG2STR_TABLE_ENTRIES]; static VALUE base36_power_cache[35][MAX_BASE36_POWER_TABLE_ENTRIES];
static size_t big2str_numdigits_cache[35][MAX_BIG2STR_TABLE_ENTRIES]; static size_t base36_numdigits_cache[35][MAX_BASE36_POWER_TABLE_ENTRIES];
static void static void
power_cache_init(void) power_cache_init(void)
{ {
int i, j; int i, j;
for (i = 0; i < 35; ++i) { for (i = 0; i < 35; ++i) {
for (j = 0; j < MAX_BIG2STR_TABLE_ENTRIES; ++j) { for (j = 0; j < MAX_BASE36_POWER_TABLE_ENTRIES; ++j) {
big2str_power_cache[i][j] = Qnil; base36_power_cache[i][j] = Qnil;
} }
} }
} }
@ -4128,23 +4128,23 @@ static inline VALUE
power_cache_get_power(int base, int power_level, size_t *numdigits_ret) power_cache_get_power(int base, int power_level, size_t *numdigits_ret)
{ {
/* /*
* MAX_BIG2STR_TABLE_ENTRIES is big enough to that * MAX_BASE36_POWER_TABLE_ENTRIES is big enough to that
* big2str_power_cache[base][MAX_BIG2STR_TABLE_ENTRIES-1] fills whole memory. * base36_power_cache[base][MAX_BASE36_POWER_TABLE_ENTRIES-1] fills whole memory.
* So MAX_BIG2STR_TABLE_ENTRIES <= power_level is not possible to calculate. * So MAX_BASE36_POWER_TABLE_ENTRIES <= power_level is not possible to calculate.
* *
* number-of-bytes = * number-of-bytes =
* log256(big2str_power_cache[base][MAX_BIG2STR_TABLE_ENTRIES-1]) = * log256(base36_power_cache[base][MAX_BASE36_POWER_TABLE_ENTRIES-1]) =
* log256(maxpow_in_bdigit_dbl(base)**(2**(MAX_BIG2STR_TABLE_ENTRIES-1))) = * log256(maxpow_in_bdigit_dbl(base)**(2**(MAX_BASE36_POWER_TABLE_ENTRIES-1))) =
* log256(maxpow_in_bdigit_dbl(base)**(2**(SIZEOF_SIZE_T*CHAR_BIT))) = * log256(maxpow_in_bdigit_dbl(base)**(2**(SIZEOF_SIZE_T*CHAR_BIT))) =
* (2**(SIZEOF_SIZE_T*CHAR_BIT))*log256(maxpow_in_bdigit_dbl(base)) = * (2**(SIZEOF_SIZE_T*CHAR_BIT))*log256(maxpow_in_bdigit_dbl(base)) =
* (256**SIZEOF_SIZE_T)*log256(maxpow_in_bdigit_dbl(base)) > * (256**SIZEOF_SIZE_T)*log256(maxpow_in_bdigit_dbl(base)) >
* (256**SIZEOF_SIZE_T)*(sizeof(BDIGIT_DBL)-1) > * (256**SIZEOF_SIZE_T)*(sizeof(BDIGIT_DBL)-1) >
* 256**SIZEOF_SIZE_T * 256**SIZEOF_SIZE_T
*/ */
if (MAX_BIG2STR_TABLE_ENTRIES <= power_level) if (MAX_BASE36_POWER_TABLE_ENTRIES <= power_level)
rb_bug("too big power number requested: maxpow_in_bdigit_dbl(%d)**(2**%d)", base, power_level); rb_bug("too big power number requested: maxpow_in_bdigit_dbl(%d)**(2**%d)", base, power_level);
if (NIL_P(big2str_power_cache[base - 2][power_level])) { if (NIL_P(base36_power_cache[base - 2][power_level])) {
VALUE power; VALUE power;
size_t numdigits; size_t numdigits;
if (power_level == 0) { if (power_level == 0) {
@ -4160,13 +4160,13 @@ power_cache_get_power(int base, int power_level, size_t *numdigits_ret)
numdigits *= 2; numdigits *= 2;
} }
rb_obj_hide(power); rb_obj_hide(power);
big2str_power_cache[base - 2][power_level] = power; base36_power_cache[base - 2][power_level] = power;
big2str_numdigits_cache[base - 2][power_level] = numdigits; base36_numdigits_cache[base - 2][power_level] = numdigits;
rb_gc_register_mark_object(power); rb_gc_register_mark_object(power);
} }
if (numdigits_ret) if (numdigits_ret)
*numdigits_ret = big2str_numdigits_cache[base - 2][power_level]; *numdigits_ret = base36_numdigits_cache[base - 2][power_level];
return big2str_power_cache[base - 2][power_level]; return base36_power_cache[base - 2][power_level];
} }
/* /*
@ -4444,12 +4444,12 @@ rb_big2str1(VALUE x, int base)
power_level = 0; power_level = 0;
power = power_cache_get_power(base, power_level, NULL); power = power_cache_get_power(base, power_level, NULL);
while (power_level < MAX_BIG2STR_TABLE_ENTRIES && while (power_level < MAX_BASE36_POWER_TABLE_ENTRIES &&
RBIGNUM_LEN(power) <= (RBIGNUM_LEN(x)+1)/2) { RBIGNUM_LEN(power) <= (RBIGNUM_LEN(x)+1)/2) {
power_level++; power_level++;
power = power_cache_get_power(base, power_level, NULL); power = power_cache_get_power(base, power_level, NULL);
} }
assert(power_level != MAX_BIG2STR_TABLE_ENTRIES); assert(power_level != MAX_BASE36_POWER_TABLE_ENTRIES);
if (RBIGNUM_LEN(power) <= RBIGNUM_LEN(x)) { if (RBIGNUM_LEN(power) <= RBIGNUM_LEN(x)) {
/* /*