diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-05-05 15:37:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-05-05 15:37:13 (GMT) |
| commit | 8d9737dce6e748ea1e1a20461ed8a5679e195432 (patch) | |
| tree | aced30070f2380bfb1d165ea56e2490908952a50 | |
| parent | 39223e515fc6ab716651c7bd1fb7b0e9a1c095e4 (diff) | |
| download | tcl-8d9737dce6e748ea1e1a20461ed8a5679e195432.zip tcl-8d9737dce6e748ea1e1a20461ed8a5679e195432.tar.gz tcl-8d9737dce6e748ea1e1a20461ed8a5679e195432.tar.bz2 | |
Fix [b7834045b9]: MS-VC 6 on core-8-6-branch: compile error C2520: conversion from unsigned __int64 to double not implemented, use signed __int64
No need to put it in change log, because regression was caused by [4128866276b86868]
| -rw-r--r-- | generic/tclStrToD.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 1cfadf0..ca0151b 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -1666,7 +1666,7 @@ MakeLowPrecisionDouble( */ retval = - ((double)significand * pow10vals[exponent]); + ((double)(Tcl_WideInt)significand * pow10vals[exponent]); goto returnValue; } else { int diff = QUICK_MAX - numSigDigs; @@ -1680,7 +1680,7 @@ MakeLowPrecisionDouble( */ volatile double factor = - ((double)significand * pow10vals[diff]); + ((double)(Tcl_WideInt)significand * pow10vals[diff]); retval = factor * pow10vals[exponent-diff]; goto returnValue; } @@ -1694,7 +1694,7 @@ MakeLowPrecisionDouble( */ retval = - ((double)significand / pow10vals[-exponent]); + ((double)(Tcl_WideInt)significand / pow10vals[-exponent]); goto returnValue; } } |