diff options
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | rational.c | 8 |
2 files changed, 10 insertions, 2 deletions
@@ -1,3 +1,7 @@ +Wed Nov 21 18:46:37 2012 Tadayoshi Funaba <tadf@dotrb.org> + + * rational.c (read_digits): due to a bit tighter rb_cstr_to_inum(). + Wed Nov 21 16:13:37 2012 Koichi Sasada <ko1@atdot.net> * benchmark/bm_so_nsieve_bits.rb: add an encoding pragma because diff --git a/rational.c b/rational.c index 16b7e4b354..b72f85119a 100644 --- a/rational.c +++ b/rational.c @@ -1986,14 +1986,16 @@ static int read_digits(const char **s, int strict, VALUE *num, int *count) { + char *b, *bb; int us = 1, ret = 1; - const char *b = *s; if (!isdecimal(**s)) { *num = ZERO; return 0; } + bb = b = ALLOCA_N(char, strlen(*s) + 1); + while (isdecimal(**s) || **s == '_') { if (**s == '_') { if (strict) { @@ -2007,6 +2009,7 @@ read_digits(const char **s, int strict, else { if (count) (*count)++; + *b++ = **s; us = 0; } (*s)++; @@ -2016,7 +2019,8 @@ read_digits(const char **s, int strict, (*s)--; } while (**s == '_'); conv: - *num = rb_cstr_to_inum(b, 10, 0); + *b = '\0'; + *num = rb_cstr_to_inum(bb, 10, 0); return ret; } |