]> git.eshelyaron.com Git - emacs.git/commit
cl-print: handle circular objects when `print-circle' is nil (Bug#27117)
authorNoam Postavsky <npostavs@gmail.com>
Sun, 28 May 2017 21:01:05 +0000 (17:01 -0400)
committerNoam Postavsky <npostavs@gmail.com>
Wed, 31 May 2017 11:45:43 +0000 (07:45 -0400)
commita415c8bccb917c247792c4ce8e77b2512b3414d6
tree222b1fd62276c7220ed06b13e2125e51e96c567c
parent94306c8b0d61a53b19dcee18475ea8692b001f5d
cl-print: handle circular objects when `print-circle' is nil (Bug#27117)

* lisp/emacs-lisp/cl-print.el (cl-print--currently-printing): New variable.
(cl-print-object): When `print-circle' is nil, bind it to a list of
objects that are currently printing to avoid printing the same object
endlessly.
* test/lisp/emacs-lisp/cl-print-tests.el (cl-print-circle): New test.
lisp/emacs-lisp/cl-print.el
test/lisp/emacs-lisp/cl-print-tests.el