* keyboard.c (follow_key, read_key_sequence): Use XUINT on key value, or checks

for CHAR_META will fail.
* keymap.c (get_keyelt): Likewise.

src/keyboard.c

@@ -8192,7 +8192,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
 	      key = keybuf[fkey_end++];
 	      /* Look up meta-characters by prefixing them
 		 with meta_prefix_char.  I hate this.  */
-	      if (INTEGERP (key) && XINT (key) & meta_modifier)
+	      if (INTEGERP (key) && XUINT (key) & meta_modifier)
 		{
 		  fkey_next
 		    = get_keymap_1
@@ -8316,7 +8316,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
 	    key = keybuf[keytran_end++];
 	    /* Look up meta-characters by prefixing them
 	       with meta_prefix_char.  I hate this.  */
-	    if (INTEGERP (key) && XINT (key) & meta_modifier)
+	    if (INTEGERP (key) && XUINT (key) & meta_modifier)
 	      {
 		keytran_next
 		  = get_keymap_1

src/keymap.c

@@ -625,7 +625,7 @@ get_keyelt (object, autoload)
 	    {
 	      Lisp_Object key;
 	      key = Fcdr (object);
-	      if (INTEGERP (key) && (XINT (key) & meta_modifier))
+	      if (INTEGERP (key) && (XUINT (key) & meta_modifier))
 		{
 		  object = access_keymap (map, meta_prefix_char, 0, 0);
 		  map = get_keymap_1 (object, 0, autoload);