From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 25 Nov 2004 03:14:35 +0000 (+0000)
Subject: (Comparison of Numbers): Add eql.
X-Git-Tag: ttn-vms-21-2-B4~3679
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5e859db984c1c4fe07efbd7d77a3588c86533829;p=emacs.git

(Comparison of Numbers): Add eql.
---

diff --git a/lispref/numbers.texi b/lispref/numbers.texi
index 3a4f4ae75c4..53435da081b 100644
--- a/lispref/numbers.texi
+++ b/lispref/numbers.texi
@@ -308,6 +308,13 @@ This function tests whether its arguments are numerically equal, and
 returns @code{t} if so, @code{nil} otherwise.
 @end defun
 
+@defun eql value1 value2
+This function compares two floating point numbers like @code{=}, and
+compares two integers like @code{=}, and acts like @code{eq} in all
+other cases.  Thus, @code{(eql 1.0 1)} returns @code{nil}, but
+@code{(eql 1.0 1.0)} and @code{(eql 1 1)} both return @code{t}.
+@end defun
+
 @defun /= number-or-marker1 number-or-marker2
 This function tests whether its arguments are numerically equal, and
 returns @code{t} if they are not, and @code{nil} if they are.