diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-04-25 03:37:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-04-25 03:37:36 +0000 |
| commit | 7b140fd7c705f14f8725254f67e951fd9829a22f (patch) | |
| tree | 279f13aa53e013daf31ed20b3bba69235a95d126 /src/regex.c | |
| parent | 6f46329ac13a1edbb2596181fb8c083169814b0b (diff) | |
| download | emacs-7b140fd7c705f14f8725254f67e951fd9829a22f.tar.gz | |
(re_search_2): Fix handling of at_dot.
Fix the way RANGE is set when handling begbuf.
Diffstat (limited to 'src/regex.c')
| -rw-r--r-- | src/regex.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/regex.c b/src/regex.c index a6c186c5c13..76000894044 100644 --- a/src/regex.c +++ b/src/regex.c @@ -3710,13 +3710,13 @@ re_search_2 (bufp, string1, size1, string2, size2, startpos, range, regs, stop) range = total_size - startpos; /* If the search isn't to be a backwards one, don't waste time in a - search for a pattern that must be anchored. */ + search for a pattern anchored at beginning of buffer. */ if (bufp->used > 0 && (re_opcode_t) bufp->buffer[0] == begbuf && range > 0) { if (startpos > 0) return -1; else - range = 1; + range = 0; } #ifdef emacs @@ -3724,8 +3724,8 @@ re_search_2 (bufp, string1, size1, string2, size2, startpos, range, regs, stop) don't keep searching past point. */ if (bufp->used > 0 && (re_opcode_t) bufp->buffer[0] == at_dot && range > 0) { - range = PT - startpos; - if (range <= 0) + range = PT_BYTE - BEGV_BYTE - startpos; + if (range < 0) return -1; } #endif /* emacs */ |