Mercurial > emacs
changeset 62630:630219b07e90
(eql): Remove. It's a builtin already.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sun, 22 May 2005 20:13:18 +0000 |
parents | 97fb202b4adc |
children | 188656dfc0db |
files | lisp/emacs-lisp/cl.el |
diffstat | 1 files changed, 1 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl.el Sun May 22 17:51:22 2005 +0000 +++ b/lisp/emacs-lisp/cl.el Sun May 22 20:13:18 2005 +0000 @@ -112,16 +112,6 @@ (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. @@ -705,5 +695,5 @@ (run-hooks 'cl-load-hook) -;;; arch-tag: 5f07fa74-f153-4524-9303-21f5be125851 +;; arch-tag: 5f07fa74-f153-4524-9303-21f5be125851 ;;; cl.el ends here