From 4ade4f7d2a8db97b238ee8dbb93bc73a0ebc289a Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Sun, 19 Jan 2014 12:36:59 +0900 Subject: [PATCH] Always ensure a trailing .0 when a printed flonum has neither a decimal nor e. --- sexp.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sexp.c b/sexp.c index 55d56ba9..b19d6b32 100644 --- a/sexp.c +++ b/sexp.c @@ -1864,7 +1864,7 @@ sexp sexp_write_one (sexp ctx, sexp obj, sexp out) { #endif { i = snprintf(numbuf, NUMBUF_LEN, "%.15g", f); - if (f == trunc(f) && ! strchr(numbuf, '.')) { + if (!strchr(numbuf, '.') && !strchr(numbuf, 'e')) { numbuf[i++] = '.'; numbuf[i++] = '0'; numbuf[i++] = '\0'; } }