1494 |
|
|
1495 |
DEFUN ("assq", Fassq, Sassq, 2, 2, 0, |
DEFUN ("assq", Fassq, Sassq, 2, 2, 0, |
1496 |
doc: /* Return non-nil if KEY is `eq' to the car of an element of LIST. |
doc: /* Return non-nil if KEY is `eq' to the car of an element of LIST. |
1497 |
The value is actually the element of LIST whose car is KEY. |
The value is actually the first element of LIST whose car is KEY. |
1498 |
Elements of LIST that are not conses are ignored. */) |
Elements of LIST that are not conses are ignored. */) |
1499 |
(key, list) |
(key, list) |
1500 |
Lisp_Object key, list; |
Lisp_Object key, list; |
1551 |
|
|
1552 |
DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0, |
DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0, |
1553 |
doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST. |
doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST. |
1554 |
The value is actually the element of LIST whose car equals KEY. */) |
The value is actually the first element of LIST whose car equals KEY. */) |
1555 |
(key, list) |
(key, list) |
1556 |
Lisp_Object key, list; |
Lisp_Object key, list; |
1557 |
{ |
{ |
1595 |
|
|
1596 |
DEFUN ("rassq", Frassq, Srassq, 2, 2, 0, |
DEFUN ("rassq", Frassq, Srassq, 2, 2, 0, |
1597 |
doc: /* Return non-nil if KEY is `eq' to the cdr of an element of LIST. |
doc: /* Return non-nil if KEY is `eq' to the cdr of an element of LIST. |
1598 |
The value is actually the element of LIST whose cdr is KEY. */) |
The value is actually the first element of LIST whose cdr is KEY. */) |
1599 |
(key, list) |
(key, list) |
1600 |
register Lisp_Object key; |
register Lisp_Object key; |
1601 |
Lisp_Object list; |
Lisp_Object list; |
1637 |
|
|
1638 |
DEFUN ("rassoc", Frassoc, Srassoc, 2, 2, 0, |
DEFUN ("rassoc", Frassoc, Srassoc, 2, 2, 0, |
1639 |
doc: /* Return non-nil if KEY is `equal' to the cdr of an element of LIST. |
doc: /* Return non-nil if KEY is `equal' to the cdr of an element of LIST. |
1640 |
The value is actually the element of LIST whose cdr equals KEY. */) |
The value is actually the first element of LIST whose cdr equals KEY. */) |
1641 |
(key, list) |
(key, list) |
1642 |
Lisp_Object key, list; |
Lisp_Object key, list; |
1643 |
{ |
{ |