Mercurial > emacs
diff src/search.c @ 25663:a5eaace0fa01
Use XCAR and XCDR instead of explicit member access.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Mon, 13 Sep 1999 03:35:33 +0000 |
parents | d30cff97fb20 |
children | b7aa6ac26872 |
line wrap: on
line diff
--- a/src/search.c Mon Sep 13 02:23:04 1999 +0000 +++ b/src/search.c Mon Sep 13 03:35:33 1999 +0000 @@ -2599,19 +2599,19 @@ /* If REUSE is a list, store as many value elements as will fit into the elements of REUSE. */ for (i = 0, tail = reuse; CONSP (tail); - i++, tail = XCONS (tail)->cdr) + i++, tail = XCDR (tail)) { if (i < 2 * len + 2) - XCONS (tail)->car = data[i]; + XCAR (tail) = data[i]; else - XCONS (tail)->car = Qnil; + XCAR (tail) = Qnil; prev = tail; } /* If we couldn't fit all value elements into REUSE, cons up the rest of them and add them to the end of REUSE. */ if (i < 2 * len + 2) - XCONS (prev)->cdr = Flist (2 * len + 2 - i, data + i); + XCDR (prev) = Flist (2 * len + 2 - i, data + i); return reuse; }