aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2010-12-21 21:40:43 +1000
committerSteve Bennett <steveb@workware.net.au>2010-12-21 21:44:43 +1000
commitd00ee5c5f67c5aa310af9b846267d312c06a8891 (patch)
tree060af21f9c6d36be42b99ba7c37e546f8b3fc141
parentb53e8406998b7c9f1cdde09030d5b3cb13613953 (diff)
downloadjimtcl-d00ee5c5f67c5aa310af9b846267d312c06a8891.zip
jimtcl-d00ee5c5f67c5aa310af9b846267d312c06a8891.tar.gz
jimtcl-d00ee5c5f67c5aa310af9b846267d312c06a8891.tar.bz2
Convert infinity to Inf
Signed-off-by: Patrick WEBER <patrick.weber@live.com>
-rw-r--r--jim.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/jim.c b/jim.c
index fa99c7c..fc954e5 100644
--- a/jim.c
+++ b/jim.c
@@ -428,6 +428,7 @@ int Jim_StringToWide(const char *str, jim_wide * widePtr, int base)
int Jim_DoubleToString(char *buf, double doubleValue)
{
int len;
+ char *buf0 = buf;
len = sprintf(buf, "%.12g", doubleValue);
@@ -439,6 +440,11 @@ int Jim_DoubleToString(char *buf, double doubleValue)
if (*buf == 'i' || *buf == 'n') {
*buf = toupper(UCHAR(*buf));
}
+ if (*buf == 'I') {
+ /* Infinity -> Inf */
+ buf[3] = '\0';
+ len = buf - buf0 + 3;
+ }
return len;
}
buf++;