summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-05-23 20:09:24 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-05-23 20:09:24 (GMT)
commitca0f6f2273f4dd8d7b7449a4da43e34d5a98d4f2 (patch)
tree3e0b07f6812a5848ee549cc167985bb03acf98da /generic/tclStrToD.c
parentb013797f961380e6a2ddd366c96c570d736bd746 (diff)
parenta9e7c22c38a58f2248f2bd51529411914cd16e06 (diff)
downloadtcl-ca0f6f2273f4dd8d7b7449a4da43e34d5a98d4f2.zip
tcl-ca0f6f2273f4dd8d7b7449a4da43e34d5a98d4f2.tar.gz
tcl-ca0f6f2273f4dd8d7b7449a4da43e34d5a98d4f2.tar.bz2
merge trunk
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r--generic/tclStrToD.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 147f96b..0c5f342 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -4479,7 +4479,7 @@ Tcl_InitBignumFromDouble(
return TCL_ERROR;
}
- fract = frexp(d,&expt);
+ fract = frexp(d, &expt);
if (expt <= 0) {
mp_init(b);
mp_zero(b);
@@ -4819,7 +4819,7 @@ Pow10TimesFrExp(
* Multiply by 10**exponent.
*/
- retval = frexp(retval * pow10vals[exponent&0xf], &j);
+ retval = frexp(retval * pow10vals[exponent & 0xf], &j);
expt += j;
for (i=4; i<9; ++i) {
if (exponent & (1<<i)) {