diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-08-11 06:39:21 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-08-11 06:39:21 +0000 |
| commit | caa82e6752f54888ddac7fd9973e3c7b7ec43cb5 (patch) | |
| tree | 29e416d3d5f3a044402791079b25733b27df6dbc | |
| parent | c70b10f66289a2daf7d60f543351ec5c1e572c65 (diff) | |
| download | emacs-caa82e6752f54888ddac7fd9973e3c7b7ec43cb5.tar.gz | |
(byte-compile-from-buffer): Set float-output-format to
nil, not "%.20e", since nil is guaranteed to not lose info on output.
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 19efb5db085..d2b9659a708 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1249,7 +1249,7 @@ With argument, insert value in current buffer after the form." ;; buffer --> output-buffer, or buffer --> eval form, return nil (let (outbuffer) (let (;; Prevent truncation of flonums and lists as we read and print them - (float-output-format "%.20e") + (float-output-format nil) (case-fold-search nil) (print-length nil) ;; Simulate entry to byte-compile-top-level |