From: tomo <tomo>
Date: Mon, 8 Aug 2005 13:12:16 +0000 (+0000)
Subject: Use `<-small' instead of `->decomposition' for compatibility mapping
X-Git-Tag: r21-4-17-chise-0_22-4^20~301
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=91e788cb57ab35449e41b3127a9374f16aa4b66b;p=chise%2Fxemacs-chise.git.1

Use `<-small' instead of `->decomposition' for compatibility mapping
to single character tagged `small'.
---

diff --git a/lisp/utf-2000/u0FE50-Small-Form-Variants.el b/lisp/utf-2000/u0FE50-Small-Form-Variants.el
index 9c74aec..8864ea1 100644
--- a/lisp/utf-2000/u0FE50-Small-Form-Variants.el
+++ b/lisp/utf-2000/u0FE50-Small-Form-Variants.el
@@ -4,7 +4,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->decomposition	small #x002C)
+    (<-small
+     ((name		  . "COMMA")
+      (=ucs		  . #x002C)	; ,
+      ))
     (=ucs		. #xFE50)	; ﹐
     (=cns11643-1	. #x212E)	; &I-C1-212E; [01-14]
     (=big5		. #xA14D)	; &I-B-A14D;
@@ -14,7 +17,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x3001)
+    (<-small
+     ((name		  . "IDEOGRAPHIC COMMA")
+      (=ucs		  . #x3001)	; 、
+      ))
     (=ucs		. #xFE51)	; ﹑
     (=cns11643-1	. #x212F)	; &I-C1-212F; [01-15]
     (=big5		. #xA14E)	; &I-B-A14E;
@@ -24,7 +30,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->decomposition	small #x002E)
+    (<-small
+     ((name		  . "FULL STOP")
+      (=ucs		  . #x002E)	; .
+      ))
     (=ucs		. #xFE52)	; ﹒
     (=cns11643-1	. #x2130)	; &I-C1-2130; [01-16]
     (=big5		. #xA14F)	; &I-B-A14F;
@@ -34,7 +43,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x003B)
+    (<-small
+     ((name		  . "SEMICOLON")
+      (=ucs		  . #x003B)	; ;
+      ))
     (=ucs		. #xFE54)	; ﹔
     (=cns11643-1	. #x2132)	; &I-C1-2132; [01-18]
     (=big5		. #xA151)	; &I-B-A151;
@@ -44,7 +56,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "CS")
     (mirrored		. nil)
-    (->decomposition	small #x003A)
+    (<-small
+     ((name		  . "COLON")
+      (=ucs		  . #x003A)	; :
+      ))
     (=ucs		. #xFE55)	; ﹕
     (=cns11643-1	. #x2133)	; &I-C1-2133; [01-19]
     (=big5		. #xA152)	; &I-B-A152;
@@ -54,7 +69,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x003F)
+    (<-small
+     ((name		  . "QUESTION MARK")
+      (=ucs		  . #x003F)	; ?
+      ))
     (=ucs		. #xFE56)	; ﹖
     (=cns11643-1	. #x2134)	; &I-C1-2134; [01-20]
     (=big5		. #xA153)	; &I-B-A153;
@@ -64,7 +82,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x0021)
+    (<-small
+     ((name		  . "EXCLAMATION MARK")
+      (=ucs		  . #x0021)	; !
+      ))
     (=ucs		. #xFE57)	; ﹗
     (=cns11643-1	. #x2135)	; &I-C1-2135; [01-21]
     (=big5		. #xA154)	; &I-B-A154;
@@ -74,7 +95,10 @@
     (general-category	punctuation dash) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x2014)
+    (<-small
+     ((name		  . "EM DASH")
+      (=ucs		  . #x2014)	; —
+      ))
     (=ucs		. #xFE58)	; ﹘
     ))
 (define-char
@@ -82,7 +106,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x0028)
+    (<-small
+     ((name		  . "LEFT PARENTHESIS")
+      (=ucs		  . #x0028)	; (
+      ))
     (=ucs		. #xFE59)	; ﹙
     (=cns11643-1	. #x215E)	; &I-C1-215E; [01-62]
     (=big5		. #xA17D)	; &I-B-A17D;
@@ -92,7 +119,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x0029)
+    (<-small
+     ((name		  . "RIGHT PARENTHESIS")
+      (=ucs		  . #x0029)	; )
+      ))
     (=ucs		. #xFE5A)	; ﹚
     (=cns11643-1	. #x215F)	; &I-C1-215F; [01-63]
     (=big5		. #xA17E)	; &I-B-A17E;
@@ -102,7 +132,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x007B)
+    (<-small
+     ((name		  . "LEFT CURLY BRACKET")
+      (=ucs		  . #x007B)	; {
+      ))
     (=ucs		. #xFE5B)	; ﹛
     (=cns11643-1	. #x2160)	; &I-C1-2160; [01-64]
     (=big5		. #xA1A1)	; &I-B-A1A1;
@@ -112,7 +145,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x007D)
+    (<-small
+     ((name		  . "RIGHT CURLY BRACKET")
+      (=ucs		  . #x007D)	; }
+      ))
     (=ucs		. #xFE5C)	; ﹜
     (=cns11643-1	. #x2161)	; &I-C1-2161; [01-65]
     (=big5		. #xA1A2)	; &I-B-A1A2;
@@ -122,7 +158,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x3014)
+    (<-small
+     ((name		  . "LEFT TORTOISE SHELL BRACKET")
+      (=ucs		  . #x3014)	; 〔
+      ))
     (=ucs		. #xFE5D)	; ﹝
     (=cns11643-1	. #x2162)	; &I-C1-2162; [01-66]
     (=big5		. #xA1A3)	; &I-B-A1A3;
@@ -132,7 +171,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x3015)
+    (<-small
+     ((name		  . "RIGHT TORTOISE SHELL BRACKET")
+      (=ucs		  . #x3015)	; 〕
+      ))
     (=ucs		. #xFE5E)	; ﹞
     (=cns11643-1	. #x2163)	; &I-C1-2163; [01-67]
     (=big5		. #xA1A4)	; &I-B-A1A4;
@@ -142,7 +184,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->decomposition	small #x0023)
+    (<-small
+     ((name		  . "NUMBER SIGN")
+      (=ucs		  . #x0023)	; #
+      ))
     (=ucs		. #xFE5F)	; ﹟
     (=cns11643-1	. #x222D)	; &I-C1-222D; [02-13]
     (=big5		. #xA1CC)	; &I-B-A1CC;
@@ -152,7 +197,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x0026)
+    (<-small
+     ((name		  . "AMPERSAND")
+      (=ucs		  . #x0026)	; &
+      ))
     (=ucs		. #xFE60)	; ï¹ 
     (=cns11643-1	. #x222E)	; &I-C1-222E; [02-14]
     (=big5		. #xA1CD)	; &I-B-A1CD;
@@ -162,7 +210,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x002A)
+    (<-small
+     ((name		  . "ASTERISK")
+      (=ucs		  . #x002A)	; *
+      ))
     (=ucs		. #xFE61)	; ﹡
     (=cns11643-1	. #x222F)	; &I-C1-222F; [02-15]
     (=big5		. #xA1CE)	; &I-B-A1CE;
@@ -172,7 +223,10 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->decomposition	small #x002B)
+    (<-small
+     ((name		  . "PLUS SIGN")
+      (=ucs		  . #x002B)	; +
+      ))
     (=ucs		. #xFE62)	; ï¹¢
     (=cns11643-1	. #x223F)	; &I-C1-223F; [02-31]
     (=big5		. #xA1DE)	; &I-B-A1DE;
@@ -182,7 +236,10 @@
     (general-category	punctuation dash) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->decomposition	small #x002D)
+    (<-small
+     ((name		  . "HYPHEN-MINUS")
+      (=ucs		  . #x002D)	; -
+      ))
     (=ucs		. #xFE63)	; ï¹£
     (=cns11643-1	. #x2240)	; &I-C1-2240; [02-32]
     (=big5		. #xA1DF)	; &I-B-A1DF;
@@ -192,7 +249,10 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x003C)
+    (<-small
+     ((name		  . "LESS-THAN SIGN")
+      (=ucs		  . #x003C)	; <
+      ))
     (=ucs		. #xFE64)	; ﹤
     (=cns11643-1	. #x2241)	; &I-C1-2241; [02-33]
     (=big5		. #xA1E0)	; &I-B-A1E0;
@@ -202,7 +262,10 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x003E)
+    (<-small
+     ((name		  . "GREATER-THAN SIGN")
+      (=ucs		  . #x003E)	; >
+      ))
     (=ucs		. #xFE65)	; ï¹¥
     (=cns11643-1	. #x2242)	; &I-C1-2242; [02-34]
     (=big5		. #xA1E1)	; &I-B-A1E1;
@@ -212,7 +275,10 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x003D)
+    (<-small
+     ((name		  . "EQUALS SIGN")
+      (=ucs		  . #x003D)	; =
+      ))
     (=ucs		. #xFE66)	; ﹦
     (=cns11643-1	. #x2243)	; &I-C1-2243; [02-35]
     (=big5		. #xA1E2)	; &I-B-A1E2;
@@ -222,7 +288,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x005C)
+    (<-small
+     ((name		  . "REVERSE SOLIDUS")
+      (=ucs		  . #x005C)	; \
+      ))
     (=ucs		. #xFE68)	; ﹨
     (=cns11643-1	. #x2262)	; &I-C1-2262; [02-66]
     (=big5		. #xA242)	; &I-B-A242;
@@ -232,7 +301,10 @@
     (general-category	symbol currency) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->decomposition	small #x0024)
+    (<-small
+     ((name		  . "DOLLAR SIGN")
+      (=ucs		  . #x0024)	; $
+      ))
     (=ucs		. #xFE69)	; ﹩
     (=cns11643-1	. #x226C)	; &I-C1-226C; [02-76]
     (=big5		. #xA24C)	; &I-B-A24C;
@@ -242,7 +314,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
-    (->decomposition	small #x0025)
+    (<-small
+     ((name		  . "PERCENT SIGN")
+      (=ucs		  . #x0025)	; %
+      ))
     (=ucs		. #xFE6A)	; ﹪
     (=cns11643-1	. #x226D)	; &I-C1-226D; [02-77]
     (=big5		. #xA24D)	; &I-B-A24D;
@@ -252,7 +327,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	small #x0040)
+    (<-small
+     ((name		  . "COMMERCIAL AT")
+      (=ucs		  . #x0040)	; @
+      ))
     (=ucs		. #xFE6B)	; ﹫
     (=cns11643-1	. #x226E)	; &I-C1-226E; [02-78]
     (=big5		. #xA24E)	; &I-B-A24E;