/* Authorship:
Ben Wing: wrote, for 19.13 (Mule). Some category table stuff
- loosely based on the original Mule.
+ loosely based on the original Mule.
Jareth Hein: fixed a couple of bugs in the implementation, and
- added regex support for categories with check_category_at
+ added regex support for categories with check_category_at
*/
#include <config.h>
switch (type) {
default:
abort();
+ return Qnil;
case CHAR_TABLE_TYPE_GENERIC:
return Qgeneric;
case CHAR_TABLE_TYPE_SYNTAX:
break;
case CHAR_TABLE_TYPE_GENERIC:
+#ifdef MULE
case CHAR_TABLE_TYPE_CATEGORY:
+#endif
case CHAR_TABLE_TYPE_DISPLAY:
default:
break;
/* Return 1 if CATEGORY_SET contains CATEGORY, else return 0.
The faster version of `!NILP (Faref (category_set, category))'. */
-#define CATEGORY_MEMBER(category, category_set) \
+#define CATEGORY_MEMBER(category, category_set) \
(bit_vector_bit(XBIT_VECTOR (category_set), category - 32))
/* Return 1 if there is a word boundary between two word-constituent