mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 14:30:50 -08:00
Code Issues Projects Releases Wiki Activity

; cl-reduce, seq-reduce: Improve wording.

Browse source
This commit is contained in:
Sean Whitton 2025-11-28 12:10:55 +00:00
parent 821b63eef7
commit 5c0d2ca79a
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/cl-seq.el
View file

@ -137,7 +137,7 @@ the result of calling FUNCTION with zero arguments. This is the
only case where FUNCTION is called with fewer than two arguments. only case where FUNCTION is called with fewer than two arguments.
If SEQ contains exactly one element and no :INITIAL-VALUE is If SEQ contains exactly one element and no :INITIAL-VALUE is
specified, then return that element and FUNCTION is not called. specified, then just return that element wihout calling FUNCTION.
If :FROM-END is non-nil, the reduction occurs from the back of If :FROM-END is non-nil, the reduction occurs from the back of
the SEQ moving forward, and the order of arguments to the the SEQ moving forward, and the order of arguments to the

2
lisp/emacs-lisp/seq.el
View file

@ -376,7 +376,7 @@ third element of SEQUENCE, etc. FUNCTION will be called with
INITIAL-VALUE (and then the accumulated value) as the first INITIAL-VALUE (and then the accumulated value) as the first
argument, and the elements from SEQUENCE as the second argument. argument, and the elements from SEQUENCE as the second argument.
If SEQUENCE is empty, return INITIAL-VALUE and FUNCTION is not called." If SEQUENCE is empty, return INITIAL-VALUE without calling FUNCTION."
(if (seq-empty-p sequence) (if (seq-empty-p sequence)
initial-value initial-value
(let ((acc initial-value)) (let ((acc initial-value))