(SPLIT_CHAR): Don't make new cell if a charset slot is found.
authortomo <tomo>
Tue, 9 Nov 1999 11:34:17 +0000 (11:34 +0000)
committertomo <tomo>
Tue, 9 Nov 1999 11:34:17 +0000 (11:34 +0000)
src/char-ucs.h

index 6c51a89..7163c9e 100644 (file)
@@ -488,8 +488,9 @@ SPLIT_CHAR (Emchar c)
 
          if (!EQ (charset, Qnil))
            {
-             if (!EQ (field = Fcdr (Fassq (charset, cdef)), Qnil) ||
-                 !EQ (field = range_charset_code_point (charset, c), Qnil))
+             if (!NILP (field = Fassq (charset, cdef)))
+               return field;
+             else if (!NILP (field = range_charset_code_point (charset, c)))
                return Fcons (charset, field);
            }
          charsets = Fcdr (charsets);