summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2002-05-08 20:00:59 +0000
committerMarius Vollmer <mvo@zagadka.de>2002-05-08 20:00:59 +0000
commite23028a5806e0dae1fd296ccaaf7af67e620355d (patch)
treefec13c6ebc6d49908d466a74748c9faf29be7ea1
parent01f6637ceb4a88b1ca07d5dcfe798d42ec2a44bb (diff)
downloadguile-e23028a5806e0dae1fd296ccaaf7af67e620355d.tar.gz
(format:fn-max): Increase to 400 so ~f and ~g can print long real
numbers with large positive and negative exponents.
-rw-r--r--ice-9/format.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/ice-9/format.scm b/ice-9/format.scm
index 6b2313ae8..1b65d4f62 100644
--- a/ice-9/format.scm
+++ b/ice-9/format.scm
@@ -1437,7 +1437,7 @@
; the flonum buffers
-(define format:fn-max 200) ; max. number of number digits
+(define format:fn-max 400) ; max. number of number digits
(define format:fn-str (make-string format:fn-max)) ; number buffer
(define format:fn-len 0) ; digit length of number
(define format:fn-dot #f) ; dot position of number