Mercurial > emacs

comparison src/fns.c @ 38483:eac29e9f6d99

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* fns.c (Fset_char_table_default): Check that a charset is defined before checking its dimension.
author Ken Raeburn <raeburn@raeburn.org>
date Wed, 18 Jul 2001 20:42:40 +0000
parents b481b8cc3923
children 0418462ff378
comparison
equal deleted inserted replaced
38482:c8c4805bde95 38483:eac29e9f6d99
2351 if (charset == CHARSET_ASCII) 2351 if (charset == CHARSET_ASCII)
2352 return (XCHAR_TABLE (char_table)->defalt = value); 2352 return (XCHAR_TABLE (char_table)->defalt = value);
2353 2353
2354 /* Even if C is not a generic char, we had better behave as if a 2354 /* Even if C is not a generic char, we had better behave as if a
2355 generic char is specified. */ 2355 generic char is specified. */
2356 if (CHARSET_DIMENSION (charset) == 1) 2356 if (!CHARSET_DEFINED_P (charset) || CHARSET_DIMENSION (charset) == 1)
2357 code1 = 0; 2357 code1 = 0;
2358 temp = XCHAR_TABLE (char_table)->contents[charset + 128]; 2358 temp = XCHAR_TABLE (char_table)->contents[charset + 128];
2359 if (!code1) 2359 if (!code1)
2360 { 2360 {
2361 if (SUB_CHAR_TABLE_P (temp)) 2361 if (SUB_CHAR_TABLE_P (temp))