(CHAR_MODIFIER_MASK): New macro.

diff --git a/src/lisp.h b/src/lisp.h
index 5920245eb68df709dd0e6b42d25234b957f7da1d..fdf351553d4ef75795dee2421ff676be6b68618b 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1043,6 +1043,10 @@ typedef unsigned char UCHAR;
 #define CHAR_CTL   (0x4000000)
 #define CHAR_META  (0x8000000)
 
+#define CHAR_MODIFIER_MASK \
+  (CHAR_ALT | CHAR_SUPER | CHAR_HYPER  | CHAR_SHIFT | CHAR_CTL | CHAR_META)
+
+
 /* Actually, the current Emacs uses 19 bits for the character value
    itself.  */
 #define CHARACTERBITS 19