diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-04-07 15:59:09 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-04-07 15:59:09 -0400 |
| commit | 39e8fd357dd0a1f3776c05eee2cc5be451686712 (patch) | |
| tree | 7783c644dc02cef24ebb231d3aeb20292b0ec07d /test/lisp/emacs-lisp/oclosure-tests.el | |
| parent | 3b411417086ceb2ce3838160d01c6f250e47bbf3 (diff) | |
| download | emacs-39e8fd357dd0a1f3776c05eee2cc5be451686712.tar.gz emacs-39e8fd357dd0a1f3776c05eee2cc5be451686712.tar.bz2 emacs-39e8fd357dd0a1f3776c05eee2cc5be451686712.zip | |
OClosure: New function `function-documentation`
As mentioned in the original OClosure commit, OClosures (ab)use the
bytecode's docstring slot to hold the OClosure's type. This currently
prevents OClosures from having their own docstring.
Introduce a new generic function `function-documentation` to fetch the
docstring of a function, which can then be implemented in various
different ways depending on the OClosure's type.
* lisp/simple.el (function-documentation): New generic function.
(bad-package-check): Strength-reduce `eval` to `symbol-value`.
* src/doc.c (Fdocumentation): Use it.
* lisp/emacs-lisp/oclosure.el (oclosure--accessor-docstring): New function.
* test/lisp/emacs-lisp/oclosure-tests.el (oclosure-test):
Add test for accessor's docstrings.
Diffstat (limited to 'test/lisp/emacs-lisp/oclosure-tests.el')
| -rw-r--r-- | test/lisp/emacs-lisp/oclosure-tests.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/oclosure-tests.el b/test/lisp/emacs-lisp/oclosure-tests.el index d3e2b3870a6..b6bdebc0a2b 100644 --- a/test/lisp/emacs-lisp/oclosure-tests.el +++ b/test/lisp/emacs-lisp/oclosure-tests.el @@ -65,6 +65,7 @@ (should (member (oclosure-test-gen ocl1) '("#<oclosure-test:#<oclosure:#<cons>>>" "#<oclosure-test:#<oclosure:#<bytecode>>>"))) + (should (stringp (documentation #'oclosure-test--fst))) )) (ert-deftest oclosure-test-limits () |