andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make byte compiler correctly write circular constants

Browse source 
2007-01-24  Miles Bader  <miles@gnu.org>

   * lisp/emacs-lisp/bytecomp.el (byte-compile-output-file-form)
   (byte-compile-output-docform): Bind `print-circle' to t.

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-614
This commit is contained in:
Miles Bader 2007-01-24 13:57:38 +00:00
parent b28080e33a
commit 5e51de792c
2 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-01-24 Miles Bader <miles@gnu.org>
* emacs-lisp/bytecomp.el (byte-compile-output-file-form)
(byte-compile-output-docform): Bind `print-circle' to t.
2007-01-24 Kenichi Handa <handa@m17n.org>
* international/ja-dic-cnv.el (skkdic-convert): Insert a related

4
lisp/emacs-lisp/bytecomp.el
View file

@ -2002,7 +2002,8 @@ With argument, insert value in current buffer after the form."
(print-length nil)
(print-level nil)
(print-quoted t)
(print-gensym t))
(print-gensym t)
(print-circle t)) ; handle circular data structures
(princ "\n" outbuffer)
(prin1 form outbuffer)
nil)))
@ -2059,6 +2060,7 @@ list that represents a doc string reference.
;; print-gensym-alist not to be cleared
;; between calls to print functions.
(print-gensym '(t))
(print-circle t) ; handle circular data structures
print-gensym-alist ; was used before print-circle existed.
(print-continuous-numbering t)
print-number-table