summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-01-07 14:32:16 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-01-07 14:32:16 (GMT)
commit7c23c5778929f9b9a38fa8626d3a83b6f3248aef (patch)
treeec439b684d49835910cb4756d59d395e779aa6f6 /generic/tclStrToD.c
parent7d90738e3aaf986b5ad2da52cca16fa71b78473c (diff)
downloadtcl-7c23c5778929f9b9a38fa8626d3a83b6f3248aef.zip
tcl-7c23c5778929f9b9a38fa8626d3a83b6f3248aef.tar.gz
tcl-7c23c5778929f9b9a38fa8626d3a83b6f3248aef.tar.bz2
Some eol whitespace eliminations
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r--generic/tclStrToD.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index e4487cb..070a061 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -1350,9 +1350,9 @@ TclParseNumber(
objPtr->typePtr = &tclDoubleType;
if (exponentSignum) {
- /*
+ /*
* At this point exponent>=0, so the following calculation
- * cannot underflow.
+ * cannot underflow.
*/
exponent = -exponent;
}
@@ -1378,7 +1378,7 @@ TclParseNumber(
}
}
- /*
+ /*
* The desired number is now significandWide * 10**exponent
* or significandBig * 10**exponent, depending on whether
* the significand has overflowed a wide int.
@@ -1901,7 +1901,7 @@ RefineApproximation(
/*
* Compute twoMv as 2*M*v, where v is the approximate value.
- * This is done by bit-whacking to calculate 2**(M2+1)*significand,
+ * This is done by bit-whacking to calculate 2**(M2+1)*significand,
* and then multiplying by 5**M5.
*/
@@ -1936,7 +1936,7 @@ RefineApproximation(
}
mp_mul_2d(&twoMd, M2+exponent+1, &twoMd);
- /*
+ /*
* Now let twoMd = twoMd - twoMv, the difference between the exact and
* approximate values.
*/
@@ -2004,7 +2004,7 @@ RefineApproximation(
}
}
- /*
+ /*
* Reduce the numerator and denominator of the corrector term so that
* they will fit in the floating point precision.
*/