summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-06-15 09:13:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-06-15 09:13:51 (GMT)
commit0f0ca3d9323a2e8dd54a6a0e11a0f9fc5467cfd8 (patch)
treee45ff672bf9678de2ee2b1d5108362186de609f8 /generic/tclStrToD.c
parent107760e1da69bea9909836bbca15050447991311 (diff)
downloadtcl-0f0ca3d9323a2e8dd54a6a0e11a0f9fc5467cfd8.zip
tcl-0f0ca3d9323a2e8dd54a6a0e11a0f9fc5467cfd8.tar.gz
tcl-0f0ca3d9323a2e8dd54a6a0e11a0f9fc5467cfd8.tar.bz2
Make panic in TclParseNumber() work when IEEE_FLOATING_POINT is not defined.
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r--generic/tclStrToD.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 67b6482..2091928 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -1183,9 +1183,9 @@ TclParseNumber(
case sNA:
case sNANPAREN:
case sNANHEX:
+#endif
Tcl_Panic("TclParseNumber: bad acceptState %d parsing '%s'",
acceptState, bytes);
-#endif
case BINARY:
shift = numTrailZeros;
if (!significandOverflow && significandWide != 0 &&