]> git.eshelyaron.com Git - emacs.git/commit
Support ellipsis expansion in cl-print
authorGemini Lasswell <gazally@runbox.com>
Fri, 15 Jun 2018 17:23:58 +0000 (10:23 -0700)
committerGemini Lasswell <gazally@runbox.com>
Fri, 3 Aug 2018 15:53:01 +0000 (08:53 -0700)
commiteba16e5e5829c244d313101a769d4988946387d9
tree33b098f6324ce3f5feefa5213403789b29527943
parente65ec81fc3e556719fae8d8b4b42f571c7e9f4fc
Support ellipsis expansion in cl-print

* lisp/emacs-lisp/cl-print.el (cl-print-object-contents): New
generic method.
(cl-print-object-contents) <cons, vector,cl-structure-object>: New
methods.
(cl-print-object) <cons>: Use cl-print-insert-ellipsis.
(cl-print-object) <vector, cl-structure-object>: Elide whole object if
print-level exceeded.  Use cl-print-insert-ellipsis.
(cl-print-insert-ellipsis, cl-print-propertize-ellipsis)
(cl-print-expand-ellipsis): New functions.

* test/lisp/emacs-lisp/cl-print-tests.el (cl-print-tests-4): Test
printing of objects nested in other objects.
(cl-print-tests-strings, cl-print-tests-ellipsis-cons)
(cl-print-tests-ellipsis-vector, cl-print-tests-ellipsis-struct)
(cl-print-tests-ellipsis-circular): New tests.
(cl-print-tests-check-ellipsis-expansion)
(cl-print-tests-check-ellipsis-expansion-rx): New functions.
lisp/emacs-lisp/cl-print.el
test/lisp/emacs-lisp/cl-print-tests.el