# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1116792798 0
# Node ID 630219b07e90ea747b427d554aad29adf5a8f679
# Parent  97fb202b4adc2b0739967aec74961862a3d70dc8
(eql): Remove.  It's a builtin already.

diff -r 97fb202b4adc -r 630219b07e90 lisp/emacs-lisp/cl.el
--- 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