From: tomo <tomo>
Date: Wed, 26 Apr 2000 11:05:36 +0000 (+0000)
Subject: (struct Lisp_Coding_System): Add `enable_composition'.
X-Git-Tag: r21-2-27-utf-2000-0_15-0~26
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=aaaabf0177798c1d0d32a546a3b35be65274a7ca;p=chise%2Fxemacs-chise.git-

(struct Lisp_Coding_System): Add `enable_composition'.
(CODING_SYSTEM_COMPOSITE): New macro.
(XCODING_SYSTEM_COMPOSITE): New macro.
---

diff --git a/src/file-coding.h b/src/file-coding.h
index ff70465..9a7bb5e 100644
--- a/src/file-coding.h
+++ b/src/file-coding.h
@@ -133,6 +133,9 @@ struct Lisp_Coding_System
     Lisp_Object decode, encode;
   } ccl;
 #endif
+#ifdef UTF2000
+  char enable_composition;
+#endif
 };
 typedef struct Lisp_Coding_System Lisp_Coding_System;
 
@@ -176,6 +179,9 @@ DECLARE_LRECORD (coding_system, struct Lisp_Coding_System);
 #define CODING_SYSTEM_CCL_DECODE(codesys) ((codesys)->ccl.decode)
 #define CODING_SYSTEM_CCL_ENCODE(codesys) ((codesys)->ccl.encode)
 #endif /* MULE */
+#ifdef UTF2000
+#define CODING_SYSTEM_COMPOSITE(codesys) ((codesys)->enable_composition)
+#endif
 
 #define XCODING_SYSTEM_NAME(codesys) \
   CODING_SYSTEM_NAME (XCODING_SYSTEM (codesys))
@@ -222,6 +228,10 @@ DECLARE_LRECORD (coding_system, struct Lisp_Coding_System);
 #define XCODING_SYSTEM_CCL_ENCODE(codesys) \
   CODING_SYSTEM_CCL_ENCODE (XCODING_SYSTEM (codesys))
 #endif /* MULE */
+#ifdef UTF2000
+#define XCODING_SYSTEM_COMPOSITE(codesys) \
+  CODING_SYSTEM_COMPOSITE (XCODING_SYSTEM (codesys))
+#endif
 
 EXFUN (Fcoding_category_list, 0);
 EXFUN (Fcoding_category_system, 1);