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 | b0787891e72dd0bf94863e5ca196578c124739f7 (patch) | |
tree | 1ec1b8021c09998ad67e53a38693ab8ec96a14a0 /lisp/emacs-lisp/bytecomp.el | |
parent | aa7ea8bd6e695ec6ea47f9c47b0d86190874a1dc (diff) | |
download | emacs-b0787891e72dd0bf94863e5ca196578c124739f7.tar.gz |
(byte-compile-from-buffer): Set float-output-format to
nil, not "%.20e", since nil is guaranteed to not lose info on output.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-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 |