aboutsummaryrefslogtreecommitdiffstats
path: root/src/fns.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/fns.c')
-rw-r--r--src/fns.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fns.c b/src/fns.c
index c999b5b08b9..b1ba5ce9509 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1689,7 +1689,7 @@ changing the value of a sequence `foo'. */)
1689 1689
1690DEFUN ("nreverse", Fnreverse, Snreverse, 1, 1, 0, 1690DEFUN ("nreverse", Fnreverse, Snreverse, 1, 1, 0,
1691 doc: /* Reverse LIST by modifying cdr pointers. 1691 doc: /* Reverse LIST by modifying cdr pointers.
1692Return the reversed list. */) 1692Return the reversed list. Expects a properly nil-terminated list. */)
1693 (Lisp_Object list) 1693 (Lisp_Object list)
1694{ 1694{
1695 register Lisp_Object prev, tail, next; 1695 register Lisp_Object prev, tail, next;
@@ -1700,7 +1700,7 @@ Return the reversed list. */)
1700 while (!NILP (tail)) 1700 while (!NILP (tail))
1701 { 1701 {
1702 QUIT; 1702 QUIT;
1703 CHECK_LIST_CONS (tail, list); 1703 CHECK_LIST_CONS (tail, tail);
1704 next = XCDR (tail); 1704 next = XCDR (tail);
1705 Fsetcdr (tail, prev); 1705 Fsetcdr (tail, prev);
1706 prev = tail; 1706 prev = tail;