]> git.eshelyaron.com Git - emacs.git/commit
projects / emacs.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 5837f75) | 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)
commitcf3e2fb8afe88badfcde8aa8545dbd01cf533311
tree0cb6afb40e1f59b759b5604038bcdababc7ed0cftree | snapshot
parent5837f75e0f1fb58df9d7f97f79ec1de9db2fc78ccommit | 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 FCR type.

* lisp/simple.el (function-docstring): Don't return FCRs'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.