diff options
author | Marius Vollmer <mvo@zagadka.de> | 2002-05-08 20:00:59 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2002-05-08 20:00:59 +0000 |
commit | e23028a5806e0dae1fd296ccaaf7af67e620355d (patch) | |
tree | fec13c6ebc6d49908d466a74748c9faf29be7ea1 | |
parent | 01f6637ceb4a88b1ca07d5dcfe798d42ec2a44bb (diff) | |
download | guile-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.scm | 2 |
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 |