diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 17:33:30 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 17:33:30 (GMT) |
commit | 820f87726f851ed6938105e54b9d402288cf40f0 (patch) | |
tree | d1c10e2c87b6aacbc541e86c58396d923a41e5ae /generic/tclStrToD.c | |
parent | bf552f0a4d5c314940d025c46551b4e5062c59ac (diff) | |
parent | e246b44499e406683adac8035e53d08b4dc0192a (diff) | |
download | tcl-820f87726f851ed6938105e54b9d402288cf40f0.zip tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.gz tcl-820f87726f851ed6938105e54b9d402288cf40f0.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r-- | generic/tclStrToD.c | 2 |
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"; |