From: Kenichi Handa <handa@m17n.org>
Date: Thu, 19 Mar 1998 07:34:29 +0000 (+0000)
Subject: (byte_char_debug_check): Call multibyte_chars_in_text
X-Git-Tag: emacs-20.3~1855
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bab9ce2f565da70ba1713b7fde72af2acb182d14;p=emacs.git

(byte_char_debug_check): Call multibyte_chars_in_text
instead of chars_in_text because we must ignore
enable-multibyte-characters here.
---

diff --git a/src/marker.c b/src/marker.c
index dcdadd705ad..86951edd2f3 100644
--- a/src/marker.c
+++ b/src/marker.c
@@ -105,13 +105,14 @@ byte_char_debug_check (b, charpos, bytepos)
 
   if (bytepos > BUF_GPT_BYTE (b))
     {
-      nchars = chars_in_text (BUF_BEG_ADDR (b),
-			      BUF_GPT_BYTE (b) - BUF_BEG_BYTE (b));
-      nchars += chars_in_text (BUF_GAP_END_ADDR (b),
-			       bytepos - BUF_GPT_BYTE (b));
+      nchars = multibyte_chars_in_text (BUF_BEG_ADDR (b),
+					BUF_GPT_BYTE (b) - BUF_BEG_BYTE (b));
+      nchars += multibyte_chars_in_text (BUF_GAP_END_ADDR (b),
+					 bytepos - BUF_GPT_BYTE (b));
     }
   else
-    nchars = chars_in_text (BUF_BEG_ADDR (b), bytepos - BUF_BEG_BYTE (b));
+    nchars = multibyte_chars_in_text (BUF_BEG_ADDR (b),
+				      bytepos - BUF_BEG_BYTE (b));
 
   if (charpos - 1 != nchars)
     abort ();