Mercurial > emacs
comparison src/search.c @ 9319:7969182b6cc6
(skip_chars, Fmatch_data, Fstore_match_data): Don't use XFASTINT as an lvalue.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 04 Oct 1994 16:12:32 +0000 |
parents | f2138d548313 |
children | 8598c3d6f2f0 |
comparison
equal
deleted
inserted
replaced
9318:a14cc1712337 | 9319:7969182b6cc6 |
---|---|
432 /* In any case, don't allow scan outside bounds of buffer. */ | 432 /* In any case, don't allow scan outside bounds of buffer. */ |
433 /* jla turned this off, for no known reason. | 433 /* jla turned this off, for no known reason. |
434 bfox turned the ZV part on, and rms turned the | 434 bfox turned the ZV part on, and rms turned the |
435 BEGV part back on. */ | 435 BEGV part back on. */ |
436 if (XINT (lim) > ZV) | 436 if (XINT (lim) > ZV) |
437 XFASTINT (lim) = ZV; | 437 XSETFASTINT (lim, ZV); |
438 if (XINT (lim) < BEGV) | 438 if (XINT (lim) < BEGV) |
439 XFASTINT (lim) = BEGV; | 439 XSETFASTINT (lim, BEGV); |
440 | 440 |
441 p = XSTRING (string)->data; | 441 p = XSTRING (string)->data; |
442 pend = p + XSTRING (string)->size; | 442 pend = p + XSTRING (string)->size; |
443 bzero (fastmap, sizeof fastmap); | 443 bzero (fastmap, sizeof fastmap); |
444 | 444 |
1499 int start = search_regs.start[i]; | 1499 int start = search_regs.start[i]; |
1500 if (start >= 0) | 1500 if (start >= 0) |
1501 { | 1501 { |
1502 if (EQ (last_thing_searched, Qt)) | 1502 if (EQ (last_thing_searched, Qt)) |
1503 { | 1503 { |
1504 XFASTINT (data[2 * i]) = start; | 1504 XSETFASTINT (data[2 * i], start); |
1505 XFASTINT (data[2 * i + 1]) = search_regs.end[i]; | 1505 XSETFASTINT (data[2 * i + 1], search_regs.end[i]); |
1506 } | 1506 } |
1507 else if (BUFFERP (last_thing_searched)) | 1507 else if (BUFFERP (last_thing_searched)) |
1508 { | 1508 { |
1509 data[2 * i] = Fmake_marker (); | 1509 data[2 * i] = Fmake_marker (); |
1510 Fset_marker (data[2 * i], | 1510 Fset_marker (data[2 * i], |
1585 else | 1585 else |
1586 { | 1586 { |
1587 if (MARKERP (marker)) | 1587 if (MARKERP (marker)) |
1588 { | 1588 { |
1589 if (XMARKER (marker)->buffer == 0) | 1589 if (XMARKER (marker)->buffer == 0) |
1590 XFASTINT (marker) = 0; | 1590 XSETFASTINT (marker, 0); |
1591 else | 1591 else |
1592 XSETBUFFER (last_thing_searched, XMARKER (marker)->buffer); | 1592 XSETBUFFER (last_thing_searched, XMARKER (marker)->buffer); |
1593 } | 1593 } |
1594 | 1594 |
1595 CHECK_NUMBER_COERCE_MARKER (marker, 0); | 1595 CHECK_NUMBER_COERCE_MARKER (marker, 0); |
1596 search_regs.start[i] = XINT (marker); | 1596 search_regs.start[i] = XINT (marker); |
1597 list = Fcdr (list); | 1597 list = Fcdr (list); |
1598 | 1598 |
1599 marker = Fcar (list); | 1599 marker = Fcar (list); |
1600 if (MARKERP (marker) && XMARKER (marker)->buffer == 0) | 1600 if (MARKERP (marker) && XMARKER (marker)->buffer == 0) |
1601 XFASTINT (marker) = 0; | 1601 XSETFASTINT (marker, 0); |
1602 | 1602 |
1603 CHECK_NUMBER_COERCE_MARKER (marker, 0); | 1603 CHECK_NUMBER_COERCE_MARKER (marker, 0); |
1604 search_regs.end[i] = XINT (marker); | 1604 search_regs.end[i] = XINT (marker); |
1605 } | 1605 } |
1606 list = Fcdr (list); | 1606 list = Fcdr (list); |