# HG changeset patch # User Jim Blandy # Date 742976325 0 # Node ID 6be09b68817f622704b880869f0aeeb4dc814f41 # Parent cd2afb94d89258bd54b7e8ed552940343d499ed1 * 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. diff -r cd2afb94d892 -r 6be09b68817f lisp/emacs-lisp/bytecomp.el --- a/lisp/emacs-lisp/bytecomp.el Sun Jul 18 06:18:03 1993 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Sun Jul 18 06:18:45 1993 +0000 @@ -1244,7 +1244,7 @@ ;; 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