Mercurial > emacs
changeset 9278:f2138d548313
(Flooking_at, skip_chars, search_buffer, set_search_regs, Fstore_match_data):
Use new accessor macros instead of calling XSET directly.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 04 Oct 1994 12:22:12 +0000 |
| parents | 21f6120be5ba |
| children | 2382e2f3884e |
| files | src/search.c |
| diffstat | 1 files changed, 6 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/src/search.c Tue Oct 04 12:21:04 1994 +0000 +++ b/src/search.c Tue Oct 04 12:22:12 1994 +0000 @@ -186,7 +186,7 @@ search_regs.start[i] += BEGV; search_regs.end[i] += BEGV; } - XSET (last_thing_searched, Lisp_Buffer, current_buffer); + XSETBUFFER (last_thing_searched, current_buffer); immediate_quit = 0; return val; } @@ -425,7 +425,7 @@ CHECK_STRING (string, 0); if (NILP (lim)) - XSET (lim, Lisp_Int, forwardp ? ZV : BEGV); + XSETINT (lim, forwardp ? ZV : BEGV); else CHECK_NUMBER_COERCE_MARKER (lim, 1); @@ -712,7 +712,7 @@ search_regs.start[i] += j; search_regs.end[i] += j; } - XSET (last_thing_searched, Lisp_Buffer, current_buffer); + XSETBUFFER (last_thing_searched, current_buffer); /* Set pos to the new position. */ pos = search_regs.start[0]; } @@ -742,7 +742,7 @@ search_regs.start[i] += j; search_regs.end[i] += j; } - XSET (last_thing_searched, Lisp_Buffer, current_buffer); + XSETBUFFER (last_thing_searched, current_buffer); pos = search_regs.end[0]; } else @@ -1038,7 +1038,7 @@ search_regs.start[0] = beg; search_regs.end[0] = beg + len; - XSET (last_thing_searched, Lisp_Buffer, current_buffer); + XSETBUFFER (last_thing_searched, current_buffer); } /* Given a string of words separated by word delimiters, @@ -1589,8 +1589,7 @@ if (XMARKER (marker)->buffer == 0) XFASTINT (marker) = 0; else - XSET (last_thing_searched, Lisp_Buffer, - XMARKER (marker)->buffer); + XSETBUFFER (last_thing_searched, XMARKER (marker)->buffer); } CHECK_NUMBER_COERCE_MARKER (marker, 0);