(encode_coding_big5): Delete bogus implementation in UTF2000.

[chise/xemacs-chise.git] / src / file-coding.c

diff --git a/src/file-coding.c b/src/file-coding.c
index 34891b1..73e33a2 100644 (file)
--- a/src/file-coding.c
+++ b/src/file-coding.c
@@ -3241,6 +3241,7 @@ static void
 encode_coding_big5 (Lstream *encoding, CONST unsigned char *src,
                    unsigned_char_dynarr *dst, unsigned int n)
 {
+#ifndef UTF2000
   unsigned char c;
   struct encoding_stream *str = ENCODING_STREAM_DATA (encoding);
   unsigned int flags  = str->flags;
@@ -3295,6 +3296,7 @@ encode_coding_big5 (Lstream *encoding, CONST unsigned char *src,
 
   str->flags = flags;
   str->ch    = ch;
+#endif
 }
 
 
@@ -3575,6 +3577,7 @@ static void
 encode_coding_ucs4 (Lstream *encoding, CONST unsigned char *src,
                    unsigned_char_dynarr *dst, unsigned int n)
 {
+#ifndef UTF2000
   struct encoding_stream *str = ENCODING_STREAM_DATA (encoding);
   unsigned int flags = str->flags;
   unsigned int ch = str->ch;
@@ -3703,6 +3706,7 @@ encode_coding_ucs4 (Lstream *encoding, CONST unsigned char *src,
   str->iso2022.current_charset = charset;
 
   /* Verbum caro factum est! */
+#endif
 }
 
 \f
@@ -5022,7 +5026,11 @@ decode_coding_iso2022 (Lstream *decoding, CONST unsigned char *src,
                  break;
 
                case 3: /* one-byte private or two-byte official */
+#ifdef UTF2000
+                 if (XCHARSET_DIMENSION (charset) == 1)
+#else
                  if (XCHARSET_PRIVATE_P (charset))
+#endif
                    {
                      DECODE_OUTPUT_PARTIAL_CHAR (ch);
 #ifdef UTF2000