mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-05 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

; * lisp/emacs-lisp/pcase.el (pcase-setq): Fix parameter names.

Browse source
This commit is contained in:
Sean Whitton 2025-11-25 21:05:50 +00:00
parent 39e9f96ba0
commit f5953186ef
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/emacs-lisp/pcase.el
View file

@ -356,16 +356,17 @@ of the elements of LIST is performed as if by `pcase-let'.
;;;###autoload
(defmacro pcase-setq (pat val &rest args)
"Assign values to variables by destructuring with `pcase'.
PATTERNS are normal `pcase' patterns, and VALUES are expression.
Each PATTERN is a normal `pcase' pattern, and each VALUE an expression.
Evaluation happens sequentially as in `setq' (not in parallel).
An example: (pcase-setq \\=`((,a) [(,b)]) \\='((1) [(2)]))
VAL is presumed to match PAT. Failure to match may signal an error or go
undetected, binding variables to arbitrary values, such as nil.
Each VALUE is presumed to match its PATTERN. Failure to match may
signal an error or go undetected, binding variables to arbitrary values,
such as nil.
\(fn PATTERNS VALUE PATTERN VALUES ...)"
\(fn PATTERN VALUE PATTERN VALUE ...)"
(declare (debug (&rest [pcase-PAT form])))
(cond
(args