# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 1029265950 0
# Node ID f88c982e1f79cd1893edb9e7a6eb9a44657ccbaf
# Parent  cbd462ecc9addfd911d6890eb702becf91585635
(Funencodable_char_position): Lisp_Object/int mixup.

diff -r cbd462ecc9ad -r f88c982e1f79 src/coding.c
--- a/src/coding.c	Tue Aug 13 01:49:40 2002 +0000
+++ b/src/coding.c	Tue Aug 13 19:12:30 2002 +0000
@@ -6619,7 +6619,7 @@
       Lisp_Object args[2];
 
       args[0] = unencodable_char_position (safe_chars, from, p, GPT_ADDR, n);
-      n -= Flength (args[0]);
+      n -= XINT (Flength (args[0]));
       if (n <= 0)
 	positions = args[0];
       else