From aaaabf0177798c1d0d32a546a3b35be65274a7ca Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 26 Apr 2000 11:05:36 +0000
Subject: [PATCH] (struct Lisp_Coding_System): Add `enable_composition'.
 (CODING_SYSTEM_COMPOSITE): New macro.
 (XCODING_SYSTEM_COMPOSITE): New macro.

---
 src/file-coding.h |   10 ++++++++++
 1 file changed, 10 insertions(+)

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);
-- 
1.7.10.4