Mercurial > emacs
changeset 90403:81f1bbab281f
(Vscript_representative_chars): New variable.
(syms_of_character): Declare it as a Lisp variable.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 06 Jun 2006 03:48:03 +0000 |
| parents | 69ac9cbd4be5 |
| children | a7d267afebf9 |
| files | src/character.c |
| diffstat | 1 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/character.c Tue Jun 06 03:47:49 2006 +0000 +++ b/src/character.c Tue Jun 06 03:48:03 2006 +0000 @@ -81,6 +81,9 @@ /* Char table of scripts. */ Lisp_Object Vchar_script_table; +/* Alist of scripts vs representative characters. */ +Lisp_Object Vscript_representative_chars; + static Lisp_Object Qchar_script_table; /* Mapping table from unibyte chars to multibyte chars. */ @@ -983,6 +986,10 @@ DEFSYM (Qchar_script_table, "char-script-table"); Fput (Qchar_script_table, Qchar_table_extra_slots, make_number (1)); Vchar_script_table = Fmake_char_table (Qchar_script_table, Qnil); + + DEFVAR_LISP ("script-representative-chars", &Vscript_representative_chars, + doc: /* Alist of scripts vs the representative characters. */); + Vscript_representative_chars = Qnil; } #endif /* emacs */