summaryrefslogtreecommitdiffstats
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)
commitf7860f65a494888a46e377831ba0419de5f364d9 (patch)
treee45ff672bf9678de2ee2b1d5108362186de609f8
parentaffb7e28db4184bd802837ba53146b985adee9ba (diff)
downloadtcl-f7860f65a494888a46e377831ba0419de5f364d9.zip
tcl-f7860f65a494888a46e377831ba0419de5f364d9.tar.gz
tcl-f7860f65a494888a46e377831ba0419de5f364d9.tar.bz2
Make panic in TclParseNumber() work when IEEE_FLOATING_POINT is not defined.
-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 &&