comparison lisp/bytecomp.el @ 4395:b03b5e362fcf

Automated merge with file:/Sources/xemacs-21.5-checked-out
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 15 Jan 2008 21:35:41 +0100 (2008-01-15)
parents e8f448f997ac
children 6f41fb7f3a65
comparison
equal deleted inserted replaced
4394:cacc942c0d0f 4395:b03b5e362fcf
1886 (print-length nil) 1886 (print-length nil)
1887 (print-level nil) 1887 (print-level nil)
1888 (print-readably t) ; print #[] for bytecode, 'x for (quote x) 1888 (print-readably t) ; print #[] for bytecode, 'x for (quote x)
1889 (print-gensym (if (and byte-compile-print-gensym 1889 (print-gensym (if (and byte-compile-print-gensym
1890 (not byte-compile-emacs19-compatibility)) 1890 (not byte-compile-emacs19-compatibility))
1891 '(t) nil))) 1891 '(t) nil))
1892 print-gensym-alist)
1892 (princ "\n" byte-compile-outbuffer) 1893 (princ "\n" byte-compile-outbuffer)
1893 (prin1 form byte-compile-outbuffer) 1894 (prin1 form byte-compile-outbuffer)
1894 nil))) 1895 nil)))
1895 1896
1896 (defun byte-compile-output-docform (preface name info form specindex quoted) 1897 (defun byte-compile-output-docform (preface name info form specindex quoted)