Index: emacs/lisp/emacs-lisp/cl.el
diff -c emacs/lisp/emacs-lisp/cl.el:1.42 emacs/lisp/emacs-lisp/cl.el:1.43
*** emacs/lisp/emacs-lisp/cl.el:1.42 Sun May 22 17:46:50 2005
--- emacs/lisp/emacs-lisp/cl.el Sun May 22 20:13:18 2005
***************
*** 112,127 ****
(defun cl-cannot-unload ()
(error "Cannot unload the feature `cl'"))
- ;;; Predicates.
-
- (defun eql (a b) ; See compiler macro in cl-macs.el
- "Return t if the two args are the same Lisp object.
- Floating-point numbers of equal value are `eql', but they may not be `eq'."
- (if (numberp a)
- (equal a b)
- (eq a b)))
-
-
;;; Generalized variables. These macros are defined here so that they
;;; can safely be used in .emacs files.
--- 112,117 ----
***************
*** 705,709 ****
(run-hooks 'cl-load-hook)
! ;;; arch-tag: 5f07fa74-f153-4524-9303-21f5be125851
;;; cl.el ends here
--- 695,699 ----
(run-hooks 'cl-load-hook)
! ;; arch-tag: 5f07fa74-f153-4524-9303-21f5be125851
;;; cl.el ends here
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
