Mercurial > emacs
comparison src/search.c @ 4951:be690aaa7194
(skip_chars): Finish reenabling checks for buffer bounds.
Use XINT, not XFASTINT, when testing.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 10 Nov 1993 08:29:34 +0000 |
parents | 8c09f87f5087 |
children | dc4d4f874b5c |
comparison
equal
deleted
inserted
replaced
4950:145c69e39666 | 4951:be690aaa7194 |
---|---|
415 XSET (lim, Lisp_Int, forwardp ? ZV : BEGV); | 415 XSET (lim, Lisp_Int, forwardp ? ZV : BEGV); |
416 else | 416 else |
417 CHECK_NUMBER_COERCE_MARKER (lim, 1); | 417 CHECK_NUMBER_COERCE_MARKER (lim, 1); |
418 | 418 |
419 /* In any case, don't allow scan outside bounds of buffer. */ | 419 /* In any case, don't allow scan outside bounds of buffer. */ |
420 | 420 /* jla turned this off, for no known reason. |
421 /* I don't know what things this breaks, and there is no entry in the | 421 bfox turned the ZV part on, and rms turned the |
422 ChangeLog, so I reinstated the end of buffer limit check. This code | 422 BEGV part back on. */ |
423 breaks without it. (bfox) */ | 423 if (XINT (lim) > ZV) |
424 /* #if 0 /* This breaks some things... jla. */ | |
425 #if 1 | |
426 if (XFASTINT (lim) > ZV) | |
427 XFASTINT (lim) = ZV; | 424 XFASTINT (lim) = ZV; |
428 #endif | 425 if (XINT (lim) < BEGV) |
429 #if 0 | |
430 if (XFASTINT (lim) < BEGV) | |
431 XFASTINT (lim) = BEGV; | 426 XFASTINT (lim) = BEGV; |
432 #endif | |
433 | 427 |
434 p = XSTRING (string)->data; | 428 p = XSTRING (string)->data; |
435 pend = p + XSTRING (string)->size; | 429 pend = p + XSTRING (string)->size; |
436 bzero (fastmap, sizeof fastmap); | 430 bzero (fastmap, sizeof fastmap); |
437 | 431 |