From: Kenichi Handa <handa@m17n.org>
Date: Wed, 8 Jul 1998 02:19:14 +0000 (+0000)
Subject: (concat): Replace explicit numeric constants with proper macros.
X-Git-Tag: emacs-20.3~368
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8b542479bbbcf55d55f478fe809ad7d4e69086ee;p=emacs.git

(concat): Replace explicit numeric constants with proper macros.
---

diff --git a/src/fns.c b/src/fns.c
index 286891add6f..e34d06748e6 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -667,8 +667,8 @@ concat (nargs, args, target_type, last_special)
 		 STRING_BYTES (XSTRING (this)));
 	  if (some_multibyte
 	      && toindex_byte > 0
-	      && XSTRING (val)->data[toindex_byte - 1] >= 0x80
-	      && XSTRING (this)->data[0] >= 0xA0)
+	      && !ASCII_BYTE_P (XSTRING (val)->data[toindex_byte - 1])
+	      && !CHAR_HEAD_P (XSTRING (this)->data[0] >= 0xA0))
 	    maybe_combine_byte = 1;
 	  toindex_byte += thislen_byte;
 	  toindex += thisleni;
@@ -744,8 +744,8 @@ concat (nargs, args, target_type, last_special)
 		  {
 		    if (some_multibyte
 			&& toindex_byte > 0
-			&& XSTRING (val)->data[toindex_byte - 1] >= 0x80
-			&& XINT (elt) >= 0xA0)
+			&& !ASCII_BYTE_P (XSTRING (val)->data[toindex_byte - 1])
+			&& !CHAR_HEAD_P (XINT (elt)))
 		      maybe_combine_byte = 1;
 		    XSTRING (val)->data[toindex_byte++] = XINT (elt);
 		    toindex++;