Check types (unless `byte-compile-delete-errors' is t), #'char<, #'char=, etc. src/ChangeLog addition: 2011-04-23 Aidan Kehoe <kehoea@parhasard.net> * editfns.c: * editfns.c (syms_of_editfns): Implement #'char= in cl-extra.el, not here, accepting more than two arguments as Common Lisp specifies. lisp/ChangeLog addition: 2011-04-23 Aidan Kehoe <kehoea@parhasard.net> * cl-extra.el (define-char-comparisons): Add type-checking when the various character-specific comparison predicates are used; don't check types if byte-compile-delete-errors is non-nil at compile-time, instead use the corresponding built-in numeric byte codes.

/* XPM */
static char *face[] = {
/* width height num_colors chars_per_pixel */
"    17    17        4            1",
/* colors */
". c #000000",
"a c #a8b038",
"b c #f8f800",
"c s None c None",
/* pixels */
"ccccccccccccccccc",
"ccccccccccccccccc",
"cccccbbbbbbcccccc",
"ccccbbbbbbbbccccc",
"cccbbbbbbbbbbcccc",
"ccbbbbbbbbbbbbccc",
"cbbaaabbbbaaabbcc",
"cbbbbbbbbbbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbaaaabbbbbcc",
"ccbbabbbbbbabbccc",
"cccbbabbbbabbcccc",
"ccccbbaaaabbccccc",
"cccccbbbbbbcccccc",
"ccccccccccccccccc"
};