Mercurial > emacs
comparison src/fns.c @ 20928:7ad239d7020b
(Fset_char_table_default): For an invalid character, call
invalid_character.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 20 Feb 1998 01:40:47 +0000 |
| parents | fd35cf0efd94 |
| children | d2366423bc00 |
comparison
equal
deleted
inserted
replaced
| 20927:765fdbf766e4 | 20928:7ad239d7020b |
|---|---|
| 1850 CHECK_NUMBER (ch, 1); | 1850 CHECK_NUMBER (ch, 1); |
| 1851 | 1851 |
| 1852 c = XINT (ch); | 1852 c = XINT (ch); |
| 1853 SPLIT_NON_ASCII_CHAR (c, charset, code1, code2); | 1853 SPLIT_NON_ASCII_CHAR (c, charset, code1, code2); |
| 1854 if (! CHARSET_DEFINED_P (charset)) | 1854 if (! CHARSET_DEFINED_P (charset)) |
| 1855 error ("Invalid character: %d", c); | 1855 invalid_character (c); |
| 1856 | 1856 |
| 1857 if (charset == CHARSET_ASCII) | 1857 if (charset == CHARSET_ASCII) |
| 1858 return (XCHAR_TABLE (char_table)->defalt = value); | 1858 return (XCHAR_TABLE (char_table)->defalt = value); |
| 1859 | 1859 |
| 1860 /* Even if C is not a generic char, we had better behave as if a | 1860 /* Even if C is not a generic char, we had better behave as if a |