Mercurial > emacs
comparison src/character.c @ 89029:ad8f56efa7c6
(syms_of_character): Setup Vprintable_chars.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 20 Aug 2002 11:11:19 +0000 |
| parents | b0277093a5f2 |
| children | 8a6da305ac40 |
comparison
equal
deleted
inserted
replaced
| 89028:4215ff2d202d | 89029:ad8f56efa7c6 |
|---|---|
| 914 Vchar_direction_table = Fmake_char_table (Qnil, make_number (1)); | 914 Vchar_direction_table = Fmake_char_table (Qnil, make_number (1)); |
| 915 | 915 |
| 916 DEFVAR_LISP ("printable-chars", &Vprintable_chars, | 916 DEFVAR_LISP ("printable-chars", &Vprintable_chars, |
| 917 doc: /* A char-table for each printable character. */); | 917 doc: /* A char-table for each printable character. */); |
| 918 Vprintable_chars = Fmake_char_table (Qnil, Qnil); | 918 Vprintable_chars = Fmake_char_table (Qnil, Qnil); |
| 919 Fset_char_table_range (Vprintable_chars, | |
| 920 Fcons (make_number (32), make_number (126)), Qt); | |
| 921 Fset_char_table_range (Vprintable_chars, | |
| 922 Fcons (make_number (160), | |
| 923 make_number (MAX_5_BYTE_CHAR)), Qt); | |
| 919 | 924 |
| 920 DEFVAR_LISP ("char-script-table", &Vchar_script_table, | 925 DEFVAR_LISP ("char-script-table", &Vchar_script_table, |
| 921 doc: /* Char table of script symbols. | 926 doc: /* Char table of script symbols. |
| 922 It has one extra slot whose value is a list of script symbols. */); | 927 It has one extra slot whose value is a list of script symbols. */); |
| 923 | 928 |