X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fmule-ccl.c;fp=src%2Fmule-ccl.c;h=83309a474123e0d45f49d0c09bdd05cd510540d0;hp=a1a408371891621f0ae95cd50c12f52ee2b8f7a5;hb=e7d7f659739435dc2ed5af83f6eb4f269e3192f7;hpb=24e5ac5c37212fc1826faafb6464701f6e768b93

diff --git a/src/mule-ccl.c b/src/mule-ccl.c
index a1a4083..83309a4 100644
--- a/src/mule-ccl.c
+++ b/src/mule-ccl.c
@@ -1304,6 +1304,13 @@ ccl_driver (struct ccl_program *ccl,
 		    reg[RRR] = i;
 		    reg[rrr] = (*src++ & 0x7F);
 		  }
+		else if (LEADING_BYTE_CONTROL_1 == i)
+		  {
+		    if (src >= src_end)
+		      goto ccl_read_multibyte_character_suspend;
+		    reg[RRR] = i;
+		    reg[rrr] = (*src++ - 0xA0);
+		  }
 		else if (i <= MAX_LEADING_BYTE_OFFICIAL_2)
 		  {
 		    if ((src + 1) >= src_end)
@@ -1353,7 +1360,7 @@ ccl_driver (struct ccl_program *ccl,
 #ifndef UTF2000
 	    case CCL_WriteMultibyteChar2:
 	      i = reg[RRR]; /* charset */
-	      if (i == LEADING_BYTE_ASCII)
+	      if (i == LEADING_BYTE_ASCII || i == LEADING_BYTE_CONTROL_1)
 		i = reg[rrr] & 0xFF;
 	      else if (XCHARSET_DIMENSION (CHARSET_BY_LEADING_BYTE (i)) == 1)
 		i = (((i - FIELD2_TO_OFFICIAL_LEADING_BYTE) << 7)