summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/eieio.el
diff options
context:
space:
mode:
authorThien-Thi Nguyen <ttn@gnu.org>2018-05-21 17:16:31 +0200
committerThien-Thi Nguyen <ttn@gnu.org>2018-05-27 10:36:35 +0200
commit4d7e54acff0869d42bfb5b95014f7e6b988666d5 (patch)
tree16bbdbb623f314dd0cf595280147e2885f67c364 /lisp/emacs-lisp/eieio.el
parent7e8227ed68357dd05cb7a4ce931e5cafe6c9dd5a (diff)
downloademacs-4d7e54acff0869d42bfb5b95014f7e6b988666d5.tar.gz
emacs-4d7e54acff0869d42bfb5b95014f7e6b988666d5.tar.bz2
emacs-4d7e54acff0869d42bfb5b95014f7e6b988666d5.zip
Use EXPVAL in docstrings of patterns defined using pcase-defmacro
Suggested by Drew Adams (Bug#31311). * lisp/emacs-lisp/cl-macs.el (cl-struct): ...here. * lisp/emacs-lisp/eieio.el (eieio): Likewise. * lisp/emacs-lisp/radix-tree.el (radix-tree-leaf): Likewise. * lisp/emacs-lisp/rx.el (rx): Likewise.
Diffstat (limited to 'lisp/emacs-lisp/eieio.el')
-rw-r--r--lisp/emacs-lisp/eieio.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el
index 78275acd9c2..b95f7486f76 100644
--- a/lisp/emacs-lisp/eieio.el
+++ b/lisp/emacs-lisp/eieio.el
@@ -346,10 +346,10 @@ variable name of the same name as the slot."
index))))
(pcase-defmacro eieio (&rest fields)
- "Pcase patterns to match EIEIO objects.
-Elements of FIELDS can be of the form (NAME PAT) in which case the contents of
-field NAME is matched against PAT, or they can be of the form NAME which
-is a shorthand for (NAME NAME)."
+ "Pcase patterns that match EIEIO object EXPVAL.
+Elements of FIELDS can be of the form (NAME PAT) in which case the
+contents of field NAME is matched against PAT, or they can be of
+ the form NAME which is a shorthand for (NAME NAME)."
(declare (debug (&rest [&or (sexp pcase-PAT) sexp])))
(let ((is (make-symbol "table")))
;; FIXME: This generates a horrendous mess of redundant let bindings.