From: Dave Love <fx@gnu.org>
Date: Tue, 7 Jan 2003 17:54:30 +0000 (+0000)
Subject: (skip_chars, skip_syntaxes): Fix type errors.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~124
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=92eaa22e5dc223aec591a70eea0a00336d853f6b;p=emacs.git

(skip_chars, skip_syntaxes): Fix type errors.
---

diff --git a/src/syntax.c b/src/syntax.c
index cf3d3bd258a..32e5802beac 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -1413,7 +1413,7 @@ skip_chars (forwardp, string, lim)
     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 @@ skip_syntaxes (forwardp, string, lim)
     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);