aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/fns.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fns.c b/src/fns.c
index 3076a000992..bb215317864 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1560,7 +1560,7 @@ assq_no_quit (key, list)
1560DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0, 1560DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0,
1561 doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST. 1561 doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST.
1562The value is actually the first element of LIST whose car equals KEY. */) 1562The value is actually the first element of LIST whose car equals KEY. */)
1563 (key, list) 1563 (key, list)
1564 Lisp_Object key, list; 1564 Lisp_Object key, list;
1565{ 1565{
1566 Lisp_Object result, car; 1566 Lisp_Object result, car;
@@ -2138,7 +2138,7 @@ The PLIST is modified by side effects. */)
2138DEFUN ("eql", Feql, Seql, 2, 2, 0, 2138DEFUN ("eql", Feql, Seql, 2, 2, 0,
2139 doc: /* Return t if the two args are the same Lisp object. 2139 doc: /* Return t if the two args are the same Lisp object.
2140Floating-point numbers of equal value are `eql', but they may not be `eq'. */) 2140Floating-point numbers of equal value are `eql', but they may not be `eq'. */)
2141 (obj1, obj2) 2141 (obj1, obj2)
2142 Lisp_Object obj1, obj2; 2142 Lisp_Object obj1, obj2;
2143{ 2143{
2144 if (FLOATP (obj1)) 2144 if (FLOATP (obj1))