* bytecomp.el (byte-compile-from-buffer): Bind float-output-format

to "%.20e", not "%20e"; the latter is always ignored, since it
	doesn't have a decimal point after the percent sign.
This commit is contained in:
Jim Blandy 1993-07-18 06:18:45 +00:00
parent 8a30241de3
commit 42106ea549

View file

@ -1244,7 +1244,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 "%.20e")
(case-fold-search nil)
(print-length nil)
;; Simulate entry to byte-compile-top-level