diff options
| -rw-r--r-- | ChangeLog | 3 | ||||
| -rwxr-xr-x | generic/tclStrToD.c | 3 |
2 files changed, 5 insertions, 1 deletions
@@ -1,5 +1,8 @@ 2006-03-21 Don Porter <dgp@users.sourceforge.net> + * generic/tclStrToD.c: One of the branches of AccumulateDecimalDigit + * tests/parseExpr.test: did not. [Bug 1451233] + * tests/env.test: Preserve case of saved env vars. [Bug 1409272] 2006-03-21 Daniel Steffen <das@users.sourceforge.net> diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 7122d33..f5ff814 100755 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStrToD.c,v 1.19 2005/12/27 20:14:09 kennykb Exp $ + * RCS: @(#) $Id: tclStrToD.c,v 1.20 2006/03/21 20:03:06 dgp Exp $ * *---------------------------------------------------------------------- */ @@ -1250,6 +1250,7 @@ AccumulateDecimalDigit( n -= 256; } mp_mul_2d(bignumRepPtr, (int)(numZeros+1)&~0x7, bignumRepPtr); + mp_add_d(bignumRepPtr, (mp_digit) digit, bignumRepPtr); } return bignumFlag; |