# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 936789362 0
# Node ID 5f9f35400f707f0267a339a7bd3ff0ca788effd5
# Parent  157f0e91232e0b9998ebb05cccaa3af77a8890a6
Reset MSBs of arguments of MAKE_CHAR.

diff -r 157f0e91232e -r 5f9f35400f70 src/charset.c
--- a/src/charset.c	Wed Sep 08 08:01:16 1999 +0000
+++ b/src/charset.c	Wed Sep 08 11:16:02 1999 +0000
@@ -423,7 +423,7 @@
   Lisp_Object ch;
   int alt_charset, alt_c1, alt_c2, dimension;
 
-  if (c < 0) c = MAKE_CHAR (charset, c1, c2);
+  if (c < 0) c = MAKE_CHAR (charset, (c1 & 0x7F) , (c2 & 0x7F));
   if (!CHAR_TABLE_P (table)
       || (ch = Faref (table, make_number (c)), !NATNUMP (ch)))
     return c;