Mercurial > emacs
changeset 21521:354a7085f1d7
(Fchar_after, Fchar_before): Fix mixing of Lisp_Object
and int
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Tue, 14 Apr 1998 12:56:53 +0000 |
| parents | ca4819c36ab9 |
| children | 48def841655f |
| files | src/editfns.c |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/editfns.c Tue Apr 14 12:55:11 1998 +0000 +++ b/src/editfns.c Tue Apr 14 12:56:53 1998 +0000 @@ -579,7 +579,7 @@ else { CHECK_NUMBER_COERCE_MARKER (pos, 0); - if (pos < BEGV || pos >= ZV) + if (XINT (pos) < BEGV || XINT (pos) >= ZV) return Qnil; pos_byte = CHAR_TO_BYTE (XINT (pos)); @@ -614,7 +614,7 @@ { CHECK_NUMBER_COERCE_MARKER (pos, 0); - if (pos <= BEGV || pos > ZV) + if (XINT (pos) <= BEGV || XINT (pos) > ZV) return Qnil; pos_byte = CHAR_TO_BYTE (XINT (pos));