diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 21:32:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 21:32:05 (GMT) |
commit | 00cb7c6add3b6ac9655f4a1ae6c904ec11306e6f (patch) | |
tree | fe337ead094addd20898ae188c89ac27aeb0f6c5 /generic/tclStrToD.c | |
parent | 4413b6647623799f5d461837b869bf0fb12496be (diff) | |
parent | 820f87726f851ed6938105e54b9d402288cf40f0 (diff) | |
download | tcl-00cb7c6add3b6ac9655f4a1ae6c904ec11306e6f.zip tcl-00cb7c6add3b6ac9655f4a1ae6c904ec11306e6f.tar.gz tcl-00cb7c6add3b6ac9655f4a1ae6c904ec11306e6f.tar.bz2 |
Merge 9.0
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 e672ea8..6383659 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"; |