Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 13:57:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

(caar, cadr, cdar, cddr): Definitions moved here and changed into defsubsts.

Browse source
This commit is contained in:
Richard M. Stallman 1997-08-23 18:55:52 +00:00
parent 2a21e93c91
commit d370591d58
1 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lisp/subr.el
View file

@ -62,6 +62,22 @@ BODY should be a list of lisp expressions."
(cons 'if (cons cond (cons nil body))))
(put 'unless 'lisp-indent-function 1)
(put 'unless 'edebug-form-spec '(&rest form))
(defsubst caar (x)
"Return the car of the car of X."
(car (car x)))
(defsubst cadr (x)
"Return the car of the cdr of X."
(car (cdr x)))
(defsubst cdar (x)
"Return the cdr of the car of X."
(cdr (car x)))
(defsubst cddr (x)
"Return the cdr of the cdr of X."
(cdr (cdr x)))
;;;; Keymap support.