Mercurial > emacs
changeset 9113:766b6288e0f2
(Fmatch_data, Fstore_match_data): Use type test macros.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 27 Sep 1994 01:24:44 +0000 |
| parents | 85182997b9c9 |
| children | 9853955949cf |
| files | src/search.c |
| diffstat | 1 files changed, 3 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/search.c Tue Sep 27 01:21:05 1994 +0000 +++ b/src/search.c Tue Sep 27 01:24:44 1994 +0000 @@ -1504,7 +1504,7 @@ XFASTINT (data[2 * i]) = start; XFASTINT (data[2 * i + 1]) = search_regs.end[i]; } - else if (XTYPE (last_thing_searched) == Lisp_Buffer) + else if (BUFFERP (last_thing_searched)) { data[2 * i] = Fmake_marker (); Fset_marker (data[2 * i], @@ -1584,7 +1584,7 @@ } else { - if (XTYPE (marker) == Lisp_Marker) + if (MARKERP (marker)) { if (XMARKER (marker)->buffer == 0) XFASTINT (marker) = 0; @@ -1598,8 +1598,7 @@ list = Fcdr (list); marker = Fcar (list); - if (XTYPE (marker) == Lisp_Marker - && XMARKER (marker)->buffer == 0) + if (MARKERP (marker) && XMARKER (marker)->buffer == 0) XFASTINT (marker) = 0; CHECK_NUMBER_COERCE_MARKER (marker, 0);