eql doc improvements

* doc/lispref/numbers.texi (Comparison of Numbers):
Copy some useful text from eql help string.
* src/fns.c (Feql): In doc string, say that eql also compares
integers by value.

diff --git a/doc/lispref/numbers.texi b/doc/lispref/numbers.texi
index f018ef4c7c09270391c1685cc0d737232559cbb9..9a5bff5a5b2ea47f38988c934c937353f58c6e84 100644 (file)
--- a/doc/lispref/numbers.texi
+++ b/doc/lispref/numbers.texi
@@ -450,6 +450,10 @@ numbers.  It compares numbers by type and numeric value, so that
 @code{(eql 1.0 1)} returns @code{nil}, but @code{(eql 1.0 1.0)} and
 @code{(eql 1 1)} both return @code{t}.  This can be used to compare
 large integers as well as small ones.
+Floating-point values with the same sign, exponent and fraction are @code{eql}.
+This differs from numeric comparison: @code{(eql 0.0 -0.0)} returns
+@code{nil} and @code{(eql 0.0e+NaN 0.0e+NaN)} returns @code{t},
+whereas @code{=} does the opposite.
 @end defun
 
 @defun /= number-or-marker1 number-or-marker2

diff --git a/src/fns.c b/src/fns.c
index 4003fe8a818fe88f405e54f2b1c9f2088f1a6ca9..f50bf8ecb77dba6bdac3465ba671854015fd42d6 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -2295,6 +2295,7 @@ The PLIST is modified by side effects.  */)
 \f
 DEFUN ("eql", Feql, Seql, 2, 2, 0,
        doc: /* Return t if the two args are `eq' or are indistinguishable numbers.
+Integers with the same value are `eql'.
 Floating-point values with the same sign, exponent and fraction are `eql'.
 This differs from numeric comparison: (eql 0.0 -0.0) returns nil and
 \(eql 0.0e+NaN 0.0e+NaN) returns t, whereas `=' does the opposite.  */)