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