X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fchartab.h;h=51910993e00516238419853d2e698fb0f94e341d;hb=38914e335d92b50143197fe1c57190bfd5fa1799;hp=2aa4931265d2ea0cf78264bbad40cadd2fefa8ad;hpb=fc475e6669a613cd6d98eb5511c749a23b63c7ac;p=chise%2Fxemacs-chise.git diff --git a/src/chartab.h b/src/chartab.h index 2aa4931..5191099 100644 --- a/src/chartab.h +++ b/src/chartab.h @@ -141,7 +141,7 @@ CHAR_TABLE_NON_ASCII_VALUE_UNSAFE (struct Lisp_Char_Table *ct, Emchar ch); INLINE Lisp_Object CHAR_TABLE_NON_ASCII_VALUE_UNSAFE (struct Lisp_Char_Table *ct, Emchar ch) { - unsigned char lb = CHAR_LEADING_BYTE (ch); + Charset_ID lb = CHAR_LEADING_BYTE (ch); if (!CHAR_TABLE_ENTRYP ((ct)->level1[lb - MIN_LEADING_BYTE])) return (ct)->level1[lb - MIN_LEADING_BYTE]; else @@ -191,6 +191,7 @@ void prune_syntax_tables (int (*obj_marked_p) (Lisp_Object)); EXFUN (Fcopy_char_table, 1); EXFUN (Fmake_char_table, 1); EXFUN (Fput_char_table, 3); +EXFUN (Fget_char_table, 2); extern Lisp_Object Vall_syntax_tables;