-#ifdef UTF2000
-INLINE_HEADER int XCHARVAL (Emchar chr);
-INLINE_HEADER int
-XCHARVAL (Emchar chr)
-{
- int code = (EMACS_UINT)(chr) >> GCBITS;
-
- if (code & 0x20000000)
- return code | 0x40000000;
- else
- return code;
-}
-#else
-#define XCHARVAL(x) ((EMACS_UINT)(x) >> GCBITS)
-#endif