summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-06-05 15:41:55 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-06-05 15:41:55 (GMT)
commit6c9c34a3b9fbf39d5e83d6bbb0af5bcacb788ae2 (patch)
treef6bc172712af3fdfa0da8dd5825793a1cf386da2 /generic
parentd76edb0ec44183dc834db1d64615b4c1456e9054 (diff)
parent22bee8161ff83b967a50d1c853fc96598d6d48c6 (diff)
downloadtcl-6c9c34a3b9fbf39d5e83d6bbb0af5bcacb788ae2.zip
tcl-6c9c34a3b9fbf39d5e83d6bbb0af5bcacb788ae2.tar.gz
tcl-6c9c34a3b9fbf39d5e83d6bbb0af5bcacb788ae2.tar.bz2
Remove unused variable mantDIGIT.
Diffstat (limited to 'generic')
-rwxr-xr-xgeneric/tclStrToD.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 332cfca..2d534a68 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -192,8 +192,6 @@ static int maxDigits; /* The maximum number of digits to the left of
* the decimal point of a double. */
static int minDigits; /* The maximum number of digits to the right
* of the decimal point in a double. */
-static int mantDIGIT; /* Number of mp_digit's needed to hold the
- * significand of a double. */
static const double pow_10_2_n[] = { /* Inexact higher powers of ten. */
1.0,
100.0,
@@ -4425,7 +4423,6 @@ TclInitDoubleConversion(void)
+ 0.5 * log(10.)) / log(10.));
minDigits = (int) floor((DBL_MIN_EXP - DBL_MANT_DIG)
* log((double) FLT_RADIX) / log(10.));
- mantDIGIT = (mantBits + DIGIT_BIT-1) / DIGIT_BIT;
log10_DIGIT_MAX = (int) floor(DIGIT_BIT * log(2.) / log(10.));
/*