diff options
author | Mark Dickinson <dickinsm@gmail.com> | 2010-01-12 22:23:56 (GMT) |
---|---|---|
committer | Mark Dickinson <dickinsm@gmail.com> | 2010-01-12 22:23:56 (GMT) |
commit | 8efef5ce9f6c0dfd2cb4720b61a37bbdfdb5e30e (patch) | |
tree | 749d0392efbc8ef53bd5f9bc22a25a41c8b4ba6d /Python/dtoa.c | |
parent | efa45f35b529a61aceb4e1266ded7a0b268b0c17 (diff) | |
download | cpython-8efef5ce9f6c0dfd2cb4720b61a37bbdfdb5e30e.zip cpython-8efef5ce9f6c0dfd2cb4720b61a37bbdfdb5e30e.tar.gz cpython-8efef5ce9f6c0dfd2cb4720b61a37bbdfdb5e30e.tar.bz2 |
Issue #7632: Fix a problem with _Py_dg_strtod that could lead to
crashes in debug builds, for certain long numeric strings
corresponding to subnormal values.
Diffstat (limited to 'Python/dtoa.c')
-rw-r--r-- | Python/dtoa.c | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/Python/dtoa.c b/Python/dtoa.c index 12e6f80..4d64be5 100644 --- a/Python/dtoa.c +++ b/Python/dtoa.c @@ -1142,7 +1142,7 @@ bigcomp(U *rv, const char *s0, BCinfo *bc) dsign = bc->dsign; nd = bc->nd; nd0 = bc->nd0; - p5 = nd + bc->e0 - 1; + p5 = nd + bc->e0; speccase = 0; if (rv->d == 0.) { /* special case: value near underflow-to-zero */ /* threshold was rounded to zero */ @@ -1227,17 +1227,21 @@ bigcomp(U *rv, const char *s0, BCinfo *bc) } } - /* Now b/d = exactly half-way between the two floating-point values */ - /* on either side of the input string. Compute first digit of b/d. */ - - if (!(dig = quorem(b,d))) { - b = multadd(b, 10, 0); /* very unlikely */ - if (b == NULL) { - Bfree(d); - return -1; - } - dig = quorem(b,d); + /* Now 10*b/d = exactly half-way between the two floating-point values + on either side of the input string. If b >= d, round down. */ + if (cmp(b, d) >= 0) { + dd = -1; + goto ret; + } + + /* Compute first digit of 10*b/d. */ + b = multadd(b, 10, 0); + if (b == NULL) { + Bfree(d); + return -1; } + dig = quorem(b, d); + assert(dig < 10); /* Compare b/d with s0 */ |