# HG changeset patch # User Dave Love # Date 950205270 0 # Node ID 7f30c54aeb09d34b0cf11bb51f710f993a2d25b9 # Parent f894902025ffff8fe997665f8fbf6ea595c27846 Don't bother testing for defalias. Don't set up `caar' &c that we now have. diff -r f894902025ff -r 7f30c54aeb09 lisp/emacs-lisp/cl-macs.el --- a/lisp/emacs-lisp/cl-macs.el Thu Feb 10 17:47:48 2000 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Thu Feb 10 17:54:30 2000 +0000 @@ -70,7 +70,6 @@ (require (progn - (or (fboundp 'defalias) (fset 'defalias 'fset)) (or (fboundp 'cl-transform-function-property) (defalias 'cl-transform-function-property (function (lambda (n p f) @@ -2582,7 +2581,6 @@ (fifth 'nth 4 x) (sixth 'nth 5 x) (seventh 'nth 6 x) (eighth 'nth 7 x) (ninth 'nth 8 x) (tenth 'nth 9 x) (rest 'cdr x) (endp 'null x) (plusp '> x 0) (minusp '< x 0) - (caar car car) (cadr car cdr) (cdar cdr car) (cddr cdr cdr) (caaar car caar) (caadr car cadr) (cadar car cdar) (caddr car cddr) (cdaar cdr caar) (cdadr cdr cadr) (cddar cdr cdar) (cdddr cdr cddr) (caaaar car caaar)