changeset 12552:176c42cc7eeb

(byte-compile-output-file-form): Bind print-length and print-level to nil.
author Karl Heuer <kwzh@gnu.org>
date Mon, 17 Jul 1995 22:46:25 +0000
parents 572a8ef6b1f4
children ce881909d36a
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Mon Jul 17 22:44:40 1995 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Mon Jul 17 22:46:25 1995 +0000
@@ -1426,6 +1426,8 @@
       (byte-compile-output-docform nil nil '("\n(" 3 ")") form nil
 				   (eq (car form) 'autoload))
     (let ((print-escape-newlines t)
+	  (print-length nil)
+	  (print-level nil)
 	  (print-readably t)	; print #[] for bytecode, 'x for (quote x)
 	  (print-gensym nil))	; this is too dangerous for now
       (princ "\n" outbuffer)