From: tomo <tomo>
Date: Tue, 9 Aug 2005 14:10:30 +0000 (+0000)
Subject: Omit `->decomposition' for compatibility mapping to single character
X-Git-Tag: r21-4-17-chise-0_22-4^20~296
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=64496493a9309e7bfcf3ed2e1d6b281dce2af58d;p=chise%2Fxemacs-chise.git

Omit `->decomposition' for compatibility mapping to single character
tagged `narrow' if the same information is stored in `<-halfwidth'
field.
---

diff --git a/lisp/utf-2000/u0FF00-Halfwidth-and-Fullwidth-Forms.el b/lisp/utf-2000/u0FF00-Halfwidth-and-Fullwidth-Forms.el
index 2932c07..470e7b2 100644
--- a/lisp/utf-2000/u0FF00-Halfwidth-and-Fullwidth-Forms.el
+++ b/lisp/utf-2000/u0FF00-Halfwidth-and-Fullwidth-Forms.el
@@ -1768,7 +1768,6 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x3002)
     (<-halfwidth
      ((name		  . "IDEOGRAPHIC FULL STOP")
       (=ucs		  . #x3002)	; 。
@@ -1781,7 +1780,6 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x300C)
     (<-halfwidth
      ((name		  . "LEFT CORNER BRACKET")
       (=ucs		  . #x300C)	; 「
@@ -1794,7 +1792,6 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x300D)
     (<-halfwidth
      ((name		  . "RIGHT CORNER BRACKET")
       (=ucs		  . #x300D)	; 」
@@ -1807,7 +1804,6 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x3001)
     (<-halfwidth
      ((name		  . "IDEOGRAPHIC COMMA")
       (=ucs		  . #x3001)	; 、
@@ -1820,7 +1816,6 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x30FB)
     (<-halfwidth
      ((name		  . "KATAKANA MIDDLE DOT")
       (=ucs		  . #x30FB)	; ・
@@ -1833,7 +1828,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30F2)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER WO")
       (=ucs		  . #x30F2)	; ヲ
@@ -1846,7 +1840,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A1)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL A")
       (=ucs		  . #x30A1)	; ァ
@@ -1859,7 +1852,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A3)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL I")
       (=ucs		  . #x30A3)	; ィ
@@ -1872,7 +1864,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A5)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL U")
       (=ucs		  . #x30A5)	; ゥ
@@ -1885,7 +1876,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A7)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL E")
       (=ucs		  . #x30A7)	; ェ
@@ -1898,7 +1888,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A9)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL O")
       (=ucs		  . #x30A9)	; ォ
@@ -1911,7 +1900,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E3)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL YA")
       (=ucs		  . #x30E3)	; ャ
@@ -1924,7 +1912,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E5)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL YU")
       (=ucs		  . #x30E5)	; ュ
@@ -1937,7 +1924,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E7)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL YO")
       (=ucs		  . #x30E7)	; ョ
@@ -1950,7 +1936,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30C3)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SMALL TU")
       (=ucs		  . #x30C3)	; ッ
@@ -1963,7 +1948,6 @@
     (general-category	letter modifier) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30FC)
     (<-halfwidth
      ((name		  . "KATAKANA-HIRAGANA PROLONGED SOUND MARK")
       (=ucs		  . #x30FC)	; ー
@@ -1976,7 +1960,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A2)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER A")
       (=ucs		  . #x30A2)	; ア
@@ -1989,7 +1972,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A4)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER I")
       (=ucs		  . #x30A4)	; イ
@@ -2002,7 +1984,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A6)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER U")
       (=ucs		  . #x30A6)	; ウ
@@ -2015,7 +1996,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30A8)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER E")
       (=ucs		  . #x30A8)	; エ
@@ -2028,7 +2008,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30AA)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER O")
       (=ucs		  . #x30AA)	; オ
@@ -2041,7 +2020,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30AB)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER KA")
       (=ucs		  . #x30AB)	; カ
@@ -2054,7 +2032,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30AD)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER KI")
       (=ucs		  . #x30AD)	; キ
@@ -2067,7 +2044,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30AF)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER KU")
       (=ucs		  . #x30AF)	; ク
@@ -2080,7 +2056,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30B1)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER KE")
       (=ucs		  . #x30B1)	; ケ
@@ -2093,7 +2068,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30B3)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER KO")
       (=ucs		  . #x30B3)	; コ
@@ -2106,7 +2080,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30B5)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SA")
       (=ucs		  . #x30B5)	; サ
@@ -2119,7 +2092,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30B7)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SI")
       (=ucs		  . #x30B7)	; シ
@@ -2132,7 +2104,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30B9)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SU")
       (=ucs		  . #x30B9)	; ス
@@ -2145,7 +2116,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30BB)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SE")
       (=ucs		  . #x30BB)	; セ
@@ -2158,7 +2128,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30BD)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER SO")
       (=ucs		  . #x30BD)	; ソ
@@ -2171,7 +2140,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30BF)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER TA")
       (=ucs		  . #x30BF)	; タ
@@ -2184,7 +2152,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30C1)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER TI")
       (=ucs		  . #x30C1)	; チ
@@ -2197,7 +2164,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30C4)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER TU")
       (=ucs		  . #x30C4)	; ツ
@@ -2210,7 +2176,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30C6)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER TE")
       (=ucs		  . #x30C6)	; テ
@@ -2223,7 +2188,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30C8)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER TO")
       (=ucs		  . #x30C8)	; ト
@@ -2236,7 +2200,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CA)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER NA")
       (=ucs		  . #x30CA)	; ナ
@@ -2249,7 +2212,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CB)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER NI")
       (=ucs		  . #x30CB)	; ニ
@@ -2262,7 +2224,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CC)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER NU")
       (=ucs		  . #x30CC)	; ヌ
@@ -2275,7 +2236,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CD)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER NE")
       (=ucs		  . #x30CD)	; ネ
@@ -2288,7 +2248,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CE)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER NO")
       (=ucs		  . #x30CE)	; ノ
@@ -2301,7 +2260,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30CF)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER HA")
       (=ucs		  . #x30CF)	; ハ
@@ -2314,7 +2272,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30D2)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER HI")
       (=ucs		  . #x30D2)	; ヒ
@@ -2327,7 +2284,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30D5)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER HU")
       (=ucs		  . #x30D5)	; フ
@@ -2340,7 +2296,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30D8)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER HE")
       (=ucs		  . #x30D8)	; ヘ
@@ -2353,7 +2308,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30DB)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER HO")
       (=ucs		  . #x30DB)	; ホ
@@ -2366,7 +2320,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30DE)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER MA")
       (=ucs		  . #x30DE)	; マ
@@ -2379,7 +2332,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30DF)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER MI")
       (=ucs		  . #x30DF)	; ミ
@@ -2392,7 +2344,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E0)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER MU")
       (=ucs		  . #x30E0)	; ム
@@ -2405,7 +2356,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E1)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER ME")
       (=ucs		  . #x30E1)	; メ
@@ -2418,7 +2368,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E2)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER MO")
       (=ucs		  . #x30E2)	; モ
@@ -2431,7 +2380,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E4)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER YA")
       (=ucs		  . #x30E4)	; ヤ
@@ -2444,7 +2392,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E6)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER YU")
       (=ucs		  . #x30E6)	; ユ
@@ -2457,7 +2404,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E8)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER YO")
       (=ucs		  . #x30E8)	; ヨ
@@ -2470,7 +2416,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30E9)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER RA")
       (=ucs		  . #x30E9)	; ラ
@@ -2483,7 +2428,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30EA)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER RI")
       (=ucs		  . #x30EA)	; リ
@@ -2496,7 +2440,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30EB)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER RU")
       (=ucs		  . #x30EB)	; ル
@@ -2509,7 +2452,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30EC)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER RE")
       (=ucs		  . #x30EC)	; レ
@@ -2522,7 +2464,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30ED)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER RO")
       (=ucs		  . #x30ED)	; ロ
@@ -2535,7 +2476,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30EF)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER WA")
       (=ucs		  . #x30EF)	; ワ
@@ -2548,7 +2488,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x30F3)
     (<-halfwidth
      ((name		  . "KATAKANA LETTER N")
       (=ucs		  . #x30F3)	; ン
@@ -2562,7 +2501,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "halfwidth katakana-hiragana voiced sound mark")
-    (->decomposition	narrow #x3099)
     (<-halfwidth
      ((name . "COMBINING KATAKANA-HIRAGANA VOICED SOUND MARK")
       (=ucs		  . #x3099)	; ゙
@@ -2576,7 +2514,6 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "halfwidth katakana-hiragana semi-voiced sound mark")
-    (->decomposition	narrow #x309A)
     (<-halfwidth
      ((name . "COMBINING KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK")
       (=ucs		  . #x309A)	; ゚
@@ -2589,7 +2526,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3164)
     (<-halfwidth
      ((name		  . "HANGUL FILLER")
       (=ucs		  . #x3164)	; ㅤ
@@ -2601,7 +2537,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3131)
     (<-halfwidth
      ((name		  . "HANGUL LETTER KIYEOK")
       (=ucs		  . #x3131)	; ㄱ
@@ -2613,7 +2548,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3132)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SSANGKIYEOK")
       (=ucs		  . #x3132)	; ㄲ
@@ -2625,7 +2559,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3133)
     (<-halfwidth
      ((name		  . "HANGUL LETTER KIYEOK-SIOS")
       (=ucs		  . #x3133)	; ㄳ
@@ -2637,7 +2570,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3134)
     (<-halfwidth
      ((name		  . "HANGUL LETTER NIEUN")
       (=ucs		  . #x3134)	; ㄴ
@@ -2649,7 +2581,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3135)
     (<-halfwidth
      ((name		  . "HANGUL LETTER NIEUN-CIEUC")
       (=ucs		  . #x3135)	; ㄵ
@@ -2661,7 +2592,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3136)
     (<-halfwidth
      ((name		  . "HANGUL LETTER NIEUN-HIEUH")
       (=ucs		  . #x3136)	; ㄶ
@@ -2673,7 +2603,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3137)
     (<-halfwidth
      ((name		  . "HANGUL LETTER TIKEUT")
       (=ucs		  . #x3137)	; ㄷ
@@ -2685,7 +2614,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3138)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SSANGTIKEUT")
       (=ucs		  . #x3138)	; ㄸ
@@ -2697,7 +2625,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3139)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL")
       (=ucs		  . #x3139)	; ㄹ
@@ -2709,7 +2636,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313A)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-KIYEOK")
       (=ucs		  . #x313A)	; ㄺ
@@ -2721,7 +2647,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313B)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-MIEUM")
       (=ucs		  . #x313B)	; ㄻ
@@ -2733,7 +2658,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313C)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-PIEUP")
       (=ucs		  . #x313C)	; ㄼ
@@ -2745,7 +2669,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313D)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-SIOS")
       (=ucs		  . #x313D)	; ㄽ
@@ -2757,7 +2680,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313E)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-THIEUTH")
       (=ucs		  . #x313E)	; ㄾ
@@ -2769,7 +2691,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x313F)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-PHIEUPH")
       (=ucs		  . #x313F)	; ㄿ
@@ -2781,7 +2702,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3140)
     (<-halfwidth
      ((name		  . "HANGUL LETTER RIEUL-HIEUH")
       (=ucs		  . #x3140)	; ㅀ
@@ -2793,7 +2713,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3141)
     (<-halfwidth
      ((name		  . "HANGUL LETTER MIEUM")
       (=ucs		  . #x3141)	; ㅁ
@@ -2805,7 +2724,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3142)
     (<-halfwidth
      ((name		  . "HANGUL LETTER PIEUP")
       (=ucs		  . #x3142)	; ㅂ
@@ -2817,7 +2735,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3143)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SSANGPIEUP")
       (=ucs		  . #x3143)	; ㅃ
@@ -2829,7 +2746,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3144)
     (<-halfwidth
      ((name		  . "HANGUL LETTER PIEUP-SIOS")
       (=ucs		  . #x3144)	; ㅄ
@@ -2841,7 +2757,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3145)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SIOS")
       (=ucs		  . #x3145)	; ㅅ
@@ -2853,7 +2768,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3146)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SSANGSIOS")
       (=ucs		  . #x3146)	; ㅆ
@@ -2865,7 +2779,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3147)
     (<-halfwidth
      ((name		  . "HANGUL LETTER IEUNG")
       (=ucs		  . #x3147)	; ㅇ
@@ -2877,7 +2790,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3148)
     (<-halfwidth
      ((name		  . "HANGUL LETTER CIEUC")
       (=ucs		  . #x3148)	; ㅈ
@@ -2889,7 +2801,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3149)
     (<-halfwidth
      ((name		  . "HANGUL LETTER SSANGCIEUC")
       (=ucs		  . #x3149)	; ㅉ
@@ -2901,7 +2812,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314A)
     (<-halfwidth
      ((name		  . "HANGUL LETTER CHIEUCH")
       (=ucs		  . #x314A)	; ㅊ
@@ -2913,7 +2823,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314B)
     (<-halfwidth
      ((name		  . "HANGUL LETTER KHIEUKH")
       (=ucs		  . #x314B)	; ㅋ
@@ -2925,7 +2834,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314C)
     (<-halfwidth
      ((name		  . "HANGUL LETTER THIEUTH")
       (=ucs		  . #x314C)	; ㅌ
@@ -2937,7 +2845,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314D)
     (<-halfwidth
      ((name		  . "HANGUL LETTER PHIEUPH")
       (=ucs		  . #x314D)	; ㅍ
@@ -2949,7 +2856,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314E)
     (<-halfwidth
      ((name		  . "HANGUL LETTER HIEUH")
       (=ucs		  . #x314E)	; ㅎ
@@ -2961,7 +2867,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x314F)
     (<-halfwidth
      ((name		  . "HANGUL LETTER A")
       (=ucs		  . #x314F)	; ㅏ
@@ -2973,7 +2878,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3150)
     (<-halfwidth
      ((name		  . "HANGUL LETTER AE")
       (=ucs		  . #x3150)	; ㅐ
@@ -2985,7 +2889,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3151)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YA")
       (=ucs		  . #x3151)	; ㅑ
@@ -2997,7 +2900,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3152)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YAE")
       (=ucs		  . #x3152)	; ㅒ
@@ -3009,7 +2911,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3153)
     (<-halfwidth
      ((name		  . "HANGUL LETTER EO")
       (=ucs		  . #x3153)	; ㅓ
@@ -3021,7 +2922,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3154)
     (<-halfwidth
      ((name		  . "HANGUL LETTER E")
       (=ucs		  . #x3154)	; ㅔ
@@ -3033,7 +2933,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3155)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YEO")
       (=ucs		  . #x3155)	; ㅕ
@@ -3045,7 +2944,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3156)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YE")
       (=ucs		  . #x3156)	; ㅖ
@@ -3057,7 +2955,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3157)
     (<-halfwidth
      ((name		  . "HANGUL LETTER O")
       (=ucs		  . #x3157)	; ㅗ
@@ -3069,7 +2966,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3158)
     (<-halfwidth
      ((name		  . "HANGUL LETTER WA")
       (=ucs		  . #x3158)	; ㅘ
@@ -3081,7 +2977,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3159)
     (<-halfwidth
      ((name		  . "HANGUL LETTER WAE")
       (=ucs		  . #x3159)	; ㅙ
@@ -3093,7 +2988,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315A)
     (<-halfwidth
      ((name		  . "HANGUL LETTER OE")
       (=ucs		  . #x315A)	; ㅚ
@@ -3105,7 +2999,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315B)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YO")
       (=ucs		  . #x315B)	; ㅛ
@@ -3117,7 +3010,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315C)
     (<-halfwidth
      ((name		  . "HANGUL LETTER U")
       (=ucs		  . #x315C)	; ㅜ
@@ -3129,7 +3021,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315D)
     (<-halfwidth
      ((name		  . "HANGUL LETTER WEO")
       (=ucs		  . #x315D)	; ㅝ
@@ -3141,7 +3032,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315E)
     (<-halfwidth
      ((name		  . "HANGUL LETTER WE")
       (=ucs		  . #x315E)	; ㅞ
@@ -3153,7 +3043,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x315F)
     (<-halfwidth
      ((name		  . "HANGUL LETTER WI")
       (=ucs		  . #x315F)	; ㅟ
@@ -3165,7 +3054,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3160)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YU")
       (=ucs		  . #x3160)	; ㅠ
@@ -3177,7 +3065,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3161)
     (<-halfwidth
      ((name		  . "HANGUL LETTER EU")
       (=ucs		  . #x3161)	; ㅡ
@@ -3189,7 +3076,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3162)
     (<-halfwidth
      ((name		  . "HANGUL LETTER YI")
       (=ucs		  . #x3162)	; ㅢ
@@ -3201,7 +3087,6 @@
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
-    (->decomposition	narrow #x3163)
     (<-halfwidth
      ((name		  . "HANGUL LETTER I")
       (=ucs		  . #x3163)	; ㅣ
@@ -3318,7 +3203,6 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x2502)
     (<-halfwidth
      ((name		  . "BOX DRAWINGS LIGHT VERTICAL")
       (=ucs		  . #x2502)	; │
@@ -3330,7 +3214,6 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x2190)
     (<-halfwidth
      ((name		  . "LEFTWARDS ARROW")
       (=ucs		  . #x2190)	; ←
@@ -3342,7 +3225,6 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x2191)
     (<-halfwidth
      ((name		  . "UPWARDS ARROW")
       (=ucs		  . #x2191)	; ↑
@@ -3354,7 +3236,6 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x2192)
     (<-halfwidth
      ((name		  . "RIGHTWARDS ARROW")
       (=ucs		  . #x2192)	; →
@@ -3366,7 +3247,6 @@
     (general-category	symbol math) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x2193)
     (<-halfwidth
      ((name		  . "DOWNWARDS ARROW")
       (=ucs		  . #x2193)	; ↓
@@ -3378,7 +3258,6 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x25A0)
     (<-halfwidth
      ((name		  . "BLACK SQUARE")
       (=ucs		  . #x25A0)	; ■
@@ -3390,7 +3269,6 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	narrow #x25CB)
     (<-halfwidth
      ((name		  . "WHITE CIRCLE")
       (=ucs		  . #x25CB)	; ○