Aidan Kehoe writes:
(defun cadr (x)
- "Return the `car' of the `cdr' of X."
+ "Return the `car' of the `cdr' of X. Equivalent to `(second
X)'."
(car (cdr x)))
FWIW, I think that (nth number-of-`d's x) is a nicer equivalent, since
cad*r is constructed algorithmically. :-)
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches