Mercurial > emacs
changeset 88873:7d441bc35e9b
(TRAILING_CODE_P): New macro.
(MAYBE_UNIFY_CHAR): Adjusted for the change of Funify_charset.
(string_char_with_unification): Fix prototype.
(Vscript_alist): Extern it.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 22 Jul 2002 06:30:30 +0000 |
parents | 6d6ec38a31ac |
children | 82c5e4f67e4a |
files | src/character.h |
diffstat | 1 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/character.h Mon Jul 22 06:27:09 2002 +0000 +++ b/src/character.h Mon Jul 22 06:30:30 2002 +0000 @@ -157,6 +157,10 @@ form. */ #define LEADING_CODE_P(byte) (((byte) & 0xC0) == 0xC0) +/* Nonzero iff BYTE is a trailing code of a non-ASCII character in a + multibyte form. */ +#define TRAILING_CODE_P(byte) (((byte) & 0xC0) == 0x80) + /* Nonzero iff BYTE starts a character in a multibyte form. This is equivalent to: (ASCII_BYTE_P (byte) || LEADING_CODE_P (byte)) */ @@ -459,7 +463,7 @@ { \ if (SYMBOLP (val)) \ { \ - Funify_charset (val, Qnil); \ + Funify_charset (val, Qnil, Qnil); \ val = CHAR_TABLE_REF (Vchar_unify_table, c); \ } \ if ((unified = XINT (val)) >= 0) \ @@ -492,8 +496,8 @@ : XINT (CHAR_TABLE_REF (Vchar_width_table, c))) extern int char_string_with_unification P_ ((int, unsigned char *)); -extern int string_char_with_unification P_ ((unsigned char *, - unsigned char **, int *)); +extern int string_char_with_unification P_ ((const unsigned char *, + const unsigned char **, int *)); extern int translate_char P_ ((Lisp_Object, int c)); extern int char_printable_p P_ ((int c)); @@ -523,6 +527,8 @@ /* A char-table for characters which may invoke auto-filling. */ extern Lisp_Object Vauto_fill_chars; +extern Lisp_Object Vscript_alist; + /* Copy LEN bytes from FROM to TO. This macro should be used only when a caller knows that LEN is short and the obvious copy loop is faster than calling bcopy which has some overhead. Copying a