(Fchar_equal): Don't ignore high bits of character.

diff --git a/src/editfns.c b/src/editfns.c
index d936dc4..9936593 100644 (file)
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1416,7 +1416,8 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer.")
   CHECK_NUMBER (c2, 1);
 
   if (!NILP (current_buffer->case_fold_search)
-      ? downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)]
+      ? (downcase[0xff & XFASTINT (c1)] == downcase[0xff & XFASTINT (c2)]
+        && (XFASTINT (c1) & ~0xff) == (XFASTINT (c2) & ~0xff))
       : XINT (c1) == XINT (c2))
     return Qt;
   return Qnil;