summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-17 17:33:30 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-17 17:33:30 (GMT)
commit820f87726f851ed6938105e54b9d402288cf40f0 (patch)
treed1c10e2c87b6aacbc541e86c58396d923a41e5ae /generic/tclStrToD.c
parentbf552f0a4d5c314940d025c46551b4e5062c59ac (diff)
parente246b44499e406683adac8035e53d08b4dc0192a (diff)
downloadtcl-820f87726f851ed6938105e54b9d402288cf40f0.zip
tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.gz
tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.bz2
Merge 8.7
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 f6156d1..a29ad07 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -4764,7 +4764,7 @@ Tcl_InitBignumFromDouble(
* Infinite values can't convert to bignum.
*/
- if (TclIsInfinite(d)) {
+ if (isinf(d)) {
if (interp != NULL) {
const char *s = "integer value too large to represent";