mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00
Code Issues Releases Activity

Improve natnump shortdoc

Browse Source 
* lisp/emacs-lisp/shortdoc.el (number): Make it clear that zero
satisfies 'natnump'.  Move 'natnump' next to 'cl-plusp' to highlight
the difference between them.
This commit is contained in:
Robert Pluim 2023-07-04 17:44:43 +02:00
parent 244d4c837a
commit c3fefb2b3a
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/emacs-lisp/shortdoc.el
View File

@ -1247,6 +1247,10 @@ A FUNC form can have any number of `:no-eval' (or `:no-value'),
:eval (>= 3 2 2 1)) :eval (>= 3 2 2 1))
(zerop (zerop
:eval (zerop 0)) :eval (zerop 0))
(natnump
:eval (natnump -1)
:eval (natnump 0)
:eval (natnump 23))
(cl-plusp (cl-plusp
:eval (cl-plusp 0) :eval (cl-plusp 0)
:eval (cl-plusp 1)) :eval (cl-plusp 1))
@ -1257,9 +1261,6 @@ A FUNC form can have any number of `:no-eval' (or `:no-value'),
:eval (cl-oddp 3)) :eval (cl-oddp 3))
(cl-evenp (cl-evenp
:eval (cl-evenp 6)) :eval (cl-evenp 6))
(natnump
:eval (natnump -1)
:eval (natnump 23))
(bignump (bignump
:eval (bignump 4) :eval (bignump 4)
:eval (bignump (expt 2 90))) :eval (bignump (expt 2 90)))