Mercurial > emacs
comparison src/search.c @ 2475:052bbdf1b817
(search_buffer): Fix typo in previous change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 07 Apr 1993 20:08:55 +0000 |
| parents | b6c62e4abf59 |
| children | 594a33ffed85 |
comparison
equal
deleted
inserted
replaced
| 2474:86c8a6e08fd4 | 2475:052bbdf1b817 |
|---|---|
| 668 s1 = ZV - BEGV; | 668 s1 = ZV - BEGV; |
| 669 s2 = 0; | 669 s2 = 0; |
| 670 } | 670 } |
| 671 while (n < 0) | 671 while (n < 0) |
| 672 { | 672 { |
| 673 int val; | |
| 673 BLOCK_INPUT; | 674 BLOCK_INPUT; |
| 674 int val = re_search_2 (&searchbuf, (char *) p1, s1, (char *) p2, s2, | 675 val = re_search_2 (&searchbuf, (char *) p1, s1, (char *) p2, s2, |
| 675 pos - BEGV, lim - pos, &search_regs, | 676 pos - BEGV, lim - pos, &search_regs, |
| 676 /* Don't allow match past current point */ | 677 /* Don't allow match past current point */ |
| 677 pos - BEGV); | 678 pos - BEGV); |
| 678 UNBLOCK_INPUT; | 679 UNBLOCK_INPUT; |
| 679 if (val == -2) | 680 if (val == -2) |
| 680 matcher_overflow (); | 681 matcher_overflow (); |
| 681 if (val >= 0) | 682 if (val >= 0) |
| 682 { | 683 { |
| 698 } | 699 } |
| 699 n++; | 700 n++; |
| 700 } | 701 } |
| 701 while (n > 0) | 702 while (n > 0) |
| 702 { | 703 { |
| 704 int val; | |
| 703 BLOCK_INPUT; | 705 BLOCK_INPUT; |
| 704 int val = re_search_2 (&searchbuf, (char *) p1, s1, (char *) p2, s2, | 706 val = re_search_2 (&searchbuf, (char *) p1, s1, (char *) p2, s2, |
| 705 pos - BEGV, lim - pos, &search_regs, | 707 pos - BEGV, lim - pos, &search_regs, |
| 706 lim - BEGV); | 708 lim - BEGV); |
| 707 UNBLOCK_INPUT; | 709 UNBLOCK_INPUT; |
| 708 if (val == -2) | 710 if (val == -2) |
| 709 matcher_overflow (); | 711 matcher_overflow (); |
| 710 if (val >= 0) | 712 if (val >= 0) |
| 711 { | 713 { |