summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-03-20 21:48:13 -0700
committerKaz Kylheku <kaz@kylheku.com>2012-03-20 21:48:13 -0700
commit66c9a8587cb22b031b5234cc5fcc93354574ca9a (patch)
treeac168677af5fd2cebab7bd90608affb1bb502df0
parentfe69004a3798e896cf7349149c6c37ec58676b45 (diff)
downloadtxr-66c9a8587cb22b031b5234cc5fcc93354574ca9a.tar.gz
txr-66c9a8587cb22b031b5234cc5fcc93354574ca9a.tar.bz2
txr-66c9a8587cb22b031b5234cc5fcc93354574ca9a.zip
* stream.c (vformat): Use larger num_buf buffer so we don't
overrun. IEEE double floats can go to e+-308.
-rw-r--r--ChangeLog5
-rw-r--r--stream.c2
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 78f6910d..f4f4efde 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
2012-03-20 Kaz Kylheku <kaz@kylheku.com>
+ * stream.c (vformat): Use larger num_buf buffer so we don't
+ overrun. IEEE double floats can go to e+-308.
+
+2012-03-20 Kaz Kylheku <kaz@kylheku.com>
+
* arith.c (flo_int): New function.
* eval.c (eval_init): flo-int registered as intrinsic.
diff --git a/stream.c b/stream.c
index 2d7a6e94..f9b1eb25 100644
--- a/stream.c
+++ b/stream.c
@@ -967,7 +967,7 @@ val vformat(val stream, val fmtstr, va_list vl)
for (;;) {
val obj;
wchar_t ch = *fmt++;
- char num_buf[256], *pnum = num_buf;
+ char num_buf[512], *pnum = num_buf;
switch (state) {
case vf_init: