Mercurial > hg > xemacs-beta

comparison src/unicode.c @ 2333:ba4677f54a05

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-10-14 17:26:18 by james] More unused parameter fixes.
author james
date Thu, 14 Oct 2004 17:26:25 +0000
parents 04bc9d2f42c7
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2332:29a88fa7050c 2333:ba4677f54a05
1232 1232
1233 When there is no international support (i.e. the 'mule feature is not 1233 When there is no international support (i.e. the 'mule feature is not
1234 present), this function simply does `int-to-char' and ignores the CHARSETS 1234 present), this function simply does `int-to-char' and ignores the CHARSETS
1235 argument. 1235 argument.
1236 */ 1236 */
1237 (code, charsets)) 1237 (code, USED_IF_MULE (charsets)))
1238 { 1238 {
1239 #ifdef MULE 1239 #ifdef MULE
1240 Lisp_Object_dynarr *dyn; 1240 Lisp_Object_dynarr *dyn;
1241 int lbs[NUM_LEADING_BYTES]; 1241 int lbs[NUM_LEADING_BYTES];
1242 int c; 1242 int c;
1636 default: abort (); 1636 default: abort ();
1637 } 1637 }
1638 } 1638 }
1639 1639
1640 static void 1640 static void
1641 encode_unicode_char (Lisp_Object charset, int h, int l, 1641 encode_unicode_char (Lisp_Object USED_IF_MULE (charset), int h,
1642 unsigned_char_dynarr *dst, enum unicode_type type, 1642 int USED_IF_MULE (l), unsigned_char_dynarr *dst,
1643 unsigned int little_endian) 1643 enum unicode_type type, unsigned int little_endian)
1644 { 1644 {
1645 #ifdef MULE 1645 #ifdef MULE
1646 int code = ichar_to_unicode (make_ichar (charset, h & 127, l & 127)); 1646 int code = ichar_to_unicode (make_ichar (charset, h & 127, l & 127));
1647 1647
1648 if (code == -1) 1648 if (code == -1)