summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/pcase.el
diff options
context:
space:
mode:
authorMark Oteiza <mvoteiza@udel.edu>2016-11-04 10:23:46 -0400
committerMark Oteiza <mvoteiza@udel.edu>2016-11-04 10:23:46 -0400
commitabe594c0990a4e6bc72b20b7ff06b4b0c01a682c (patch)
treeb88f616a050671315a8f2e4883b3e3d802ad0658 /lisp/emacs-lisp/pcase.el
parent6a4158022e3eefccd76a1c1e9a87eb69e223b29e (diff)
downloademacs-abe594c0990a4e6bc72b20b7ff06b4b0c01a682c.tar.gz
emacs-abe594c0990a4e6bc72b20b7ff06b4b0c01a682c.tar.bz2
emacs-abe594c0990a4e6bc72b20b7ff06b4b0c01a682c.zip
* lisp/emacs-lisp/pcase.el (pcase-dolist): Add a docstring.
Diffstat (limited to 'lisp/emacs-lisp/pcase.el')
-rw-r--r--lisp/emacs-lisp/pcase.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index 0b8dddfacc9..896ad925928 100644
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -298,6 +298,8 @@ any kind of error."
;;;###autoload
(defmacro pcase-dolist (spec &rest body)
+ "Like `dolist' but where the binding can be a `pcase' pattern.
+\n(fn (PATTERN LIST) BODY...)"
(declare (indent 1) (debug ((pcase-PAT form) body)))
(if (pcase--trivial-upat-p (car spec))
`(dolist ,spec ,@body)