Mercurial > emacs
comparison src/coding.c @ 46875:f88c982e1f79
(Funencodable_char_position): Lisp_Object/int mixup.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Tue, 13 Aug 2002 19:12:30 +0000 |
| parents | a26dd8891732 |
| children | ff3c709c7ef1 |
comparison
equal
deleted
inserted
replaced
| 46874:cbd462ecc9ad | 46875:f88c982e1f79 |
|---|---|
| 6617 else | 6617 else |
| 6618 { | 6618 { |
| 6619 Lisp_Object args[2]; | 6619 Lisp_Object args[2]; |
| 6620 | 6620 |
| 6621 args[0] = unencodable_char_position (safe_chars, from, p, GPT_ADDR, n); | 6621 args[0] = unencodable_char_position (safe_chars, from, p, GPT_ADDR, n); |
| 6622 n -= Flength (args[0]); | 6622 n -= XINT (Flength (args[0])); |
| 6623 if (n <= 0) | 6623 if (n <= 0) |
| 6624 positions = args[0]; | 6624 positions = args[0]; |
| 6625 else | 6625 else |
| 6626 { | 6626 { |
| 6627 args[1] = unencodable_char_position (safe_chars, GPT, GAP_END_ADDR, | 6627 args[1] = unencodable_char_position (safe_chars, GPT, GAP_END_ADDR, |