aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-02-10 17:54:30 +0000
committerDave Love2000-02-10 17:54:30 +0000
commit4e85dd7ae52cd0d8d4ca5970a0e733274ea54e72 (patch)
tree3f38955371958244fef2f9855da05ab5cf77183b
parent99f016129e8053f2985c8ec677669a690852a0f0 (diff)
downloademacs-4e85dd7ae52cd0d8d4ca5970a0e733274ea54e72.tar.gz
emacs-4e85dd7ae52cd0d8d4ca5970a0e733274ea54e72.zip
Don't bother testing for defalias. Don't set up `caar' &c that we now
have.
-rw-r--r--lisp/emacs-lisp/cl-macs.el2
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 85287507f58..b0709ac1e40 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -70,7 +70,6 @@
70 70
71(require 71(require
72 (progn 72 (progn
73 (or (fboundp 'defalias) (fset 'defalias 'fset))
74 (or (fboundp 'cl-transform-function-property) 73 (or (fboundp 'cl-transform-function-property)
75 (defalias 'cl-transform-function-property 74 (defalias 'cl-transform-function-property
76 (function (lambda (n p f) 75 (function (lambda (n p f)
@@ -2582,7 +2581,6 @@ surrounded by (block NAME ...)."
2582 (fifth 'nth 4 x) (sixth 'nth 5 x) (seventh 'nth 6 x) 2581 (fifth 'nth 4 x) (sixth 'nth 5 x) (seventh 'nth 6 x)
2583 (eighth 'nth 7 x) (ninth 'nth 8 x) (tenth 'nth 9 x) 2582 (eighth 'nth 7 x) (ninth 'nth 8 x) (tenth 'nth 9 x)
2584 (rest 'cdr x) (endp 'null x) (plusp '> x 0) (minusp '< x 0) 2583 (rest 'cdr x) (endp 'null x) (plusp '> x 0) (minusp '< x 0)
2585 (caar car car) (cadr car cdr) (cdar cdr car) (cddr cdr cdr)
2586 (caaar car caar) (caadr car cadr) (cadar car cdar) 2584 (caaar car caar) (caadr car cadr) (cadar car cdar)
2587 (caddr car cddr) (cdaar cdr caar) (cdadr cdr cadr) 2585 (caddr car cddr) (cdaar cdr caar) (cdadr cdr cadr)
2588 (cddar cdr cdar) (cdddr cdr cddr) (caaaar car caaar) 2586 (cddar cdr cdar) (cdddr cdr cddr) (caaaar car caaar)