Mercurial > emacs

comparison src/charset.c @ 88590:ac9b0ae4c5a0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
If CODE1 is nil, use the minimum code of the charset.
author Kenichi Handa <handa@m17n.org>
date Tue, 21 May 2002 05:39:08 +0000
parents f4f7b1532dc3
children 46a07af4f6e0
comparison
equal deleted inserted replaced
88589:f09f6d2eb15c 88590:ac9b0ae4c5a0
1492 CHECK_CHARSET_GET_ID (charset, id); 1492 CHECK_CHARSET_GET_ID (charset, id);
1493 charsetp = CHARSET_FROM_ID (id); 1493 charsetp = CHARSET_FROM_ID (id);
1494 1494
1495 dimension = CHARSET_DIMENSION (charsetp); 1495 dimension = CHARSET_DIMENSION (charsetp);
1496 if (NILP (code1)) 1496 if (NILP (code1))
1497 code = charsetp->code_space[(dimension - 1) * 4]; 1497 code = (CHARSET_ASCII_COMPATIBLE_P (charsetp)
1498 ? 0 : CHARSET_MIN_CODE (charsetp));
1498 else 1499 else
1499 { 1500 {
1500 CHECK_NATNUM (code1); 1501 CHECK_NATNUM (code1);
1501 if (XFASTINT (code1) >= 0x100) 1502 if (XFASTINT (code1) >= 0x100)
1502 args_out_of_range (make_number (0xFF), code1); 1503 args_out_of_range (make_number (0xFF), code1);