procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(last): New function.

Browse source
This commit is contained in:
Richard M. Stallman 1997-08-23 19:10:42 +00:00
parent d370591d58
commit e8c32c9941
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/subr.el
View file

@ -78,6 +78,13 @@ BODY should be a list of lisp expressions."
(defsubst cddr (x)
"Return the cdr of the cdr of X."
(cdr (cdr x)))
(defun last (x)
"Return the last element of the list X.
If X is nil, return nil."
(while (cdr x)
(setq x (cdr x)))
x)
;;;; Keymap support.