* lisp/emacs-lisp/radix-tree.el (pcase-defmacro): Improve docstring
This commit is contained in:
parent
4c85e3f7e9
commit
69771b4e6a
1 changed files with 2 additions and 2 deletions
|
@ -196,8 +196,8 @@ If not found, return nil."
|
|||
|
||||
(eval-and-compile
|
||||
(pcase-defmacro radix-tree-leaf (vpat)
|
||||
"Build a `pcase' pattern that matches radix-tree leaf EXPVAL.
|
||||
VPAT is a `pcase' pattern to extract the value."
|
||||
"Pattern which matches a radix-tree leaf.
|
||||
The pattern VPAT is matched against the leaf's carried value."
|
||||
;; FIXME: We'd like to use a negative pattern (not consp), but pcase
|
||||
;; doesn't support it. Using `atom' works but generates sub-optimal code.
|
||||
`(or `(t . ,,vpat) (and (pred atom) ,vpat))))
|
||||
|
|
Loading…
Add table
Reference in a new issue