(Fset_unibyte_charset): Setup

unibyte_has_multibyte_table.

1 files changed, 2 insertions, 0 deletions

diff --git a/src/charset.c b/src/charset.c
index e0bfcb5eb76..5924d2af6dc 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -1174,10 +1174,12 @@ function `unibyte-charset'.  */)
       || cs->dimension != 1)
     error ("Inappropriate unibyte charset: %s", SDATA (SYMBOL_NAME (charset)));
   charset_unibyte = cs->id;
+  memset (unibyte_has_multibyte_table, 1, 128);
   for (i = 128; i < 256; i++)
     {
       c = DECODE_CHAR (cs, i);
       unibyte_to_multibyte_table[i] = (c < 0 ? BYTE8_TO_CHAR (i) : c);
+      unibyte_has_multibyte_table[i] = c >= 0;
     }
 
   return Qnil;