mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00
Code Issues Projects Releases Wiki Activity

(TRAILING_CODE_P): New macro.

Browse source 
(MAYBE_UNIFY_CHAR): Adjusted for the change of Funify_charset.
(string_char_with_unification): Fix prototype.
(Vscript_alist): Extern it.
This commit is contained in:
Kenichi Handa 2002-07-22 06:30:30 +00:00
parent b2d2821515
commit b5c7dbe655
1 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/character.h
View file

@ -157,6 +157,10 @@ Boston, MA 02111-1307, USA. */
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 @@ Boston, MA 02111-1307, USA. */
{ \
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 @@ Boston, MA 02111-1307, USA. */
: 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 @@ extern Lisp_Object string_escape_byte8 P_ ((Lisp_Object));
/* 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