(Funencodable_char_position): Lisp_Object/int mixup.

This commit is contained in:
Gerd Moellmann 2002-08-13 19:12:46 +00:00
parent 2bef95e520
commit 96d2e64dce
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2002-08-13 Gerd Moellmann <gerd.moellmann@t-online.de>
* coding.c (Funencodable_char_position): Lisp_Object/int mixup.
2002-08-12 Richard M. Stallman <rms@gnu.org> 2002-08-12 Richard M. Stallman <rms@gnu.org>
* syswait.h: Only the include of sys/wait.h tests HAVE_SYS_WAIT_H. * syswait.h: Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.

View file

@ -6619,7 +6619,7 @@ to the string. */)
Lisp_Object args[2]; Lisp_Object args[2];
args[0] = unencodable_char_position (safe_chars, from, p, GPT_ADDR, n); args[0] = unencodable_char_position (safe_chars, from, p, GPT_ADDR, n);
n -= Flength (args[0]); n -= XINT (Flength (args[0]));
if (n <= 0) if (n <= 0)
positions = args[0]; positions = args[0];
else else