Mercurial > emacs
changeset 89341:9664825d832f
(skip_chars, skip_syntaxes): Fix type errors.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Tue, 07 Jan 2003 17:54:30 +0000 |
| parents | 1cc27231b263 |
| children | 8cf1af9a4468 |
| files | src/syntax.c |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/syntax.c Tue Jan 07 17:54:11 2003 +0000 +++ b/src/syntax.c Tue Jan 07 17:54:30 2003 +0000 @@ -1413,7 +1413,7 @@ XSETFASTINT (lim, BEGV); multibyte = (!NILP (current_buffer->enable_multibyte_characters) - && (lim - PT != CHAR_TO_BYTE (lim) - PT_BYTE)); + && (XINT (lim) - PT != CHAR_TO_BYTE (XINT (lim)) - PT_BYTE)); string_multibyte = STRING_BYTES (XSTRING (string)) > XSTRING (string)->size; bzero (fastmap, sizeof fastmap); @@ -1732,10 +1732,10 @@ XSETFASTINT (lim, BEGV); if (forwardp ? (PT >= XFASTINT (lim)) : (PT <= XFASTINT (lim))) - return 0; + return Qnil; multibyte = (!NILP (current_buffer->enable_multibyte_characters) - && (lim - PT != CHAR_TO_BYTE (lim) - PT_BYTE)); + && (XINT (lim) - PT != CHAR_TO_BYTE (XINT (lim)) - PT_BYTE)); bzero (fastmap, sizeof fastmap);