]> git.eshelyaron.com Git - emacs.git/commit
projects / emacs.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 9465a7e) | patch
cl-print.el: Dispatch on `advice` type
authorStefan Monnier <monnier@iro.umontreal.ca>
Sun, 19 Dec 2021 00:20:25 +0000 (19:20 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Sun, 19 Dec 2021 00:20:25 +0000 (19:20 -0500)
commitafa68def26a041a63402ae43dcaa056d6439a62d
tree9ed488b7edf4b5eaaf5e1f53698a1760b99f2ae9tree | snapshot
parent9465a7e59e7cc0140762c4c6fd9e83cfc7dd27a6commit | diff
cl-print.el: Dispatch on `advice` type

* test/lisp/emacs-lisp/nadvice-tests.el (advice-test-print): New test.

* src/doc.c (store_function_docstring): Don't overwrite an OClosure type.

* lisp/simple.el (function-docstring): Don't return OClosures's type.

* lisp/emacs-lisp/nadvice.el (advice--cl-print-object): New function,
extracted from `cl-print-object`.

* lisp/emacs-lisp/cl-print.el (cl-print-object) <advice>: Use the
`advice` type for the dispatch.  Use `advice--cl-print-object`.
lisp/emacs-lisp/cl-print.el diff | blob | history
lisp/emacs-lisp/nadvice.el diff | blob | history
lisp/simple.el diff | blob | history
src/doc.c diff | blob | history
test/lisp/emacs-lisp/nadvice-tests.el diff | blob | history
Unnamed repository; edit this file 'description' to name the repository.