New files.
authortomo <tomo>
Sun, 14 Nov 1999 12:18:22 +0000 (12:18 +0000)
committertomo <tomo>
Sun, 14 Nov 1999 12:18:22 +0000 (12:18 +0000)
lisp/utf-2000/u02000-General-Punctuation.el [new file with mode: 0644]
lisp/utf-2000/u02070-Superscripts.el [new file with mode: 0644]
lisp/utf-2000/u02080-Subscripts.el [new file with mode: 0644]
lisp/utf-2000/u020A0-Currency-Symbols.el [new file with mode: 0644]
lisp/utf-2000/u020D0-Combining-Diacritical-Marks-for-Symbols.el [new file with mode: 0644]

diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el
new file mode 100644 (file)
index 0000000..3524625
--- /dev/null
@@ -0,0 +1,697 @@
+(define-char
+  '((name              . "EN QUAD")
+    (ucs               . #x2000)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   #x2002)
+    ))
+(define-char
+  '((name              . "EM QUAD")
+    (ucs               . #x2001)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   #x2003)
+    ))
+(define-char
+  '((name              . "EN SPACE")
+    (ucs               . #x2002)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "EM SPACE")
+    (ucs               . #x2003)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    (chinese-cns11643-1 #x25 #x6D)     ; \e$(G%m\e(B
+    ))
+(define-char
+  '((name              . "THREE-PER-EM SPACE")
+    (ucs               . #x2004)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "FOUR-PER-EM SPACE")
+    (ucs               . #x2005)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "SIX-PER-EM SPACE")
+    (ucs               . #x2006)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "FIGURE SPACE")
+    (ucs               . #x2007)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   noBreak #x0020)
+    ))
+(define-char
+  '((name              . "PUNCTUATION SPACE")
+    (ucs               . #x2008)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "THIN SPACE")
+    (ucs               . #x2009)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "HAIR SPACE")
+    (ucs               . #x200A)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020)
+    ))
+(define-char
+  '((name              . "ZERO WIDTH SPACE")
+    (ucs               . #x200B)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ZERO WIDTH NON-JOINER")
+    (ucs               . #x200C)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ZERO WIDTH JOINER")
+    (ucs               . #x200D)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "LEFT-TO-RIGHT MARK")
+    (ucs               . #x200E)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "L")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "RIGHT-TO-LEFT MARK")
+    (ucs               . #x200F)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "R")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "HYPHEN")
+    (ucs               . #x2010)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x3E)      ; \e$(@!>\e(B
+    (japanese-jisx0208         #x21 #x3E)      ; \e$(B!>\e(B
+    ))
+(define-char
+  '((name              . "NON-BREAKING HYPHEN")
+    (ucs               . #x2011)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   noBreak #x2010)
+    ))
+(define-char
+  '((name              . "FIGURE DASH")
+    (ucs               . #x2012)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "EN DASH")
+    (ucs               . #x2013)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-cns11643-1 #x21 #x39)     ; \e$(G!9\e(B
+    ))
+(define-char
+  '((name              . "EM DASH")
+    (ucs               . #x2014)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x3D)      ; \e$(@!=\e(B
+    (japanese-jisx0208         #x21 #x3D)      ; \e$(B!=\e(B
+    (chinese-cns11643-1                #x21 #x37)      ; \e$(G!7\e(B
+    ))
+(define-char
+  '((name              . "HORIZONTAL BAR")
+    (ucs               . #x2015)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-gb2312    #x21 #x2A)      ; \e$(A!*\e(B
+    (korean-ksc5601    #x21 #x2A)      ; \e$(C!*\e(B
+    ))
+(define-char
+  '((name              . "HALFWIDTH HORIZONTAL BAR")
+    (->ucs             . #x2015)
+    (general-category  punctuation dash) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   narrow #x2015)
+    (greek-iso8859-7   #xAF)   ; \e-F¯\e-A
+    ))
+(define-char
+  '((name              . "DOUBLE VERTICAL LINE")
+    (ucs               . #x2016)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x42)      ; \e$(@!B\e(B
+    (chinese-gb2312            #x21 #x2C)      ; \e$(A!,\e(B
+    (japanese-jisx0208         #x21 #x42)      ; \e$(B!B\e(B
+    (chinese-cns11643-1                #x22 #x5D)      ; \e$(G"]\e(B
+    ))
+(define-char
+  '((name              . "DOUBLE LOW LINE")
+    (ucs               . #x2017)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0333)
+    (hebrew-iso8859-8  #xDF)   ; \9b2]\e-Hß\9b0]\e-A
+    ))
+(define-char
+  '((name              . "LEFT SINGLE QUOTATION MARK")
+    (ucs               . #x2018)
+    (general-category  punctuation initial-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x46)      ; \e$(@!F\e(B
+    (chinese-gb2312            #x21 #x2E)      ; \e$(A!.\e(B
+    (japanese-jisx0208         #x21 #x46)      ; \e$(B!F\e(B
+    (korean-ksc5601            #x21 #x2E)      ; \e$(C!.\e(B
+    (chinese-cns11643-1                #x21 #x64)      ; \e$(G!d\e(B
+    ))
+(define-char
+  '((name              . "RIGHT SINGLE QUOTATION MARK")
+    (ucs               . #x2019)
+    (general-category  punctuation final-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x47)      ; \e$(@!G\e(B
+    (chinese-gb2312            #x21 #x2F)      ; \e$(A!/\e(B
+    (japanese-jisx0208         #x21 #x47)      ; \e$(B!G\e(B
+    (korean-ksc5601            #x21 #x2F)      ; \e$(C!/\e(B
+    (chinese-cns11643-1                #x21 #x65)      ; \e$(G!e\e(B
+    ))
+(define-char
+  '((name              . "SINGLE LOW-9 QUOTATION MARK")
+    (ucs               . #x201A)
+    (general-category  punctuation open) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "SINGLE HIGH-REVERSED-9 QUOTATION MARK")
+    (ucs               . #x201B)
+    (general-category  punctuation initial-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "LEFT DOUBLE QUOTATION MARK")
+    (ucs               . #x201C)
+    (general-category  punctuation initial-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x48)      ; \e$(@!H\e(B
+    (chinese-gb2312            #x21 #x30)      ; \e$(A!0\e(B
+    (japanese-jisx0208         #x21 #x48)      ; \e$(B!H\e(B
+    (korean-ksc5601            #x21 #x30)      ; \e$(C!0\e(B
+    (chinese-cns11643-1                #x21 #x66)      ; \e$(G!f\e(B
+    ))
+(define-char
+  '((name              . "RIGHT DOUBLE QUOTATION MARK")
+    (ucs               . #x201D)
+    (general-category  punctuation final-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x49)      ; \e$(@!I\e(B
+    (chinese-gb2312            #x21 #x31)      ; \e$(A!1\e(B
+    (japanese-jisx0208         #x21 #x49)      ; \e$(B!I\e(B
+    (korean-ksc5601            #x21 #x31)      ; \e$(C!1\e(B
+    (chinese-cns11643-1                #x21 #x67)      ; \e$(G!g\e(B
+    ))
+(define-char
+  '((name              . "DOUBLE LOW-9 QUOTATION MARK")
+    (ucs               . #x201E)
+    (general-category  punctuation open) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "DOUBLE HIGH-REVERSED-9 QUOTATION MARK")
+    (ucs               . #x201F)
+    (general-category  punctuation initial-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "DAGGER")
+    (ucs               . #x2020)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208 #x22 #x77)      ; \e$(B"w\e(B
+    (korean-ksc5601    #x22 #x53)      ; \e$(C"S\e(B
+    ))
+(define-char
+  '((name              . "DOUBLE DAGGER")
+    (ucs               . #x2021)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208 #x22 #x78)      ; \e$(B"x\e(B
+    (korean-ksc5601    #x22 #x54)      ; \e$(C"T\e(B
+    ))
+(define-char
+  '((name              . "BULLET")
+    (ucs               . #x2022)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "TRIANGULAR BULLET")
+    (ucs               . #x2023)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ONE DOT LEADER")
+    (ucs               . #x2024)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x002E)
+    ))
+(define-char
+  '((name              . "TWO DOT LEADER")
+    (ucs               . #x2025)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x002E #x002E)
+    (japanese-jisx0208-1978    #x21 #x45)      ; \e$(@!E\e(B
+    (japanese-jisx0208         #x21 #x45)      ; \e$(B!E\e(B
+    (korean-ksc5601            #x21 #x25)      ; \e$(C!%\e(B
+    (chinese-cns11643-1                #x21 #x2D)      ; \e$(G!-\e(B
+    ))
+(define-char
+  '((name              . "HORIZONTAL ELLIPSIS")
+    (ucs               . #x2026)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x002E #x002E #x002E)
+    (japanese-jisx0208-1978    #x21 #x44)      ; \e$(@!D\e(B
+    (chinese-gb2312            #x21 #x2D)      ; \e$(A!-\e(B
+    (japanese-jisx0208         #x21 #x44)      ; \e$(B!D\e(B
+    (korean-ksc5601            #x21 #x26)      ; \e$(C!&\e(B
+    (chinese-cns11643-1                #x21 #x2C)      ; \e$(G!,\e(B
+    ))
+(define-char
+  '((name              . "HYPHENATION POINT")
+    (ucs               . #x2027)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-cns11643-1 #x21 #x31)     ; \e$(G!1\e(B
+    ))
+(define-char
+  '((name              . "LINE SEPARATOR")
+    (ucs               . #x2028)
+    (general-category  separator line) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "PARAGRAPH SEPARATOR")
+    (ucs               . #x2029)
+    (general-category  separator paragraph) ; Normative Category
+    (bidi-category     . "B")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "LEFT-TO-RIGHT EMBEDDING")
+    (ucs               . #x202A)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "LRE")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "RIGHT-TO-LEFT EMBEDDING")
+    (ucs               . #x202B)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "RLE")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "POP DIRECTIONAL FORMATTING")
+    (ucs               . #x202C)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "PDF")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "LEFT-TO-RIGHT OVERRIDE")
+    (ucs               . #x202D)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "LRO")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "RIGHT-TO-LEFT OVERRIDE")
+    (ucs               . #x202E)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "RLO")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "NARROW NO-BREAK SPACE")
+    (ucs               . #x202F)
+    (general-category  separator space) ; Normative Category
+    (bidi-category     . "WS")
+    (mirrored          . nil)
+    (->decomposition   noBreak #x0020)
+    ))
+(define-char
+  '((name              . "PER MILLE SIGN")
+    (ucs               . #x2030)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (chinese-gb2312    #x21 #x6B)      ; \e$(A!k\e(B
+    (japanese-jisx0208 #x22 #x73)      ; \e$(B"s\e(B
+    (korean-ksc5601    #x22 #x36)      ; \e$(C"6\e(B
+    ))
+(define-char
+  '((name              . "PER TEN THOUSAND SIGN")
+    (ucs               . #x2031)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "PRIME")
+    (ucs               . #x2032)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x21 #x6C)      ; \e$(@!l\e(B
+    (chinese-gb2312            #x21 #x64)      ; \e$(A!d\e(B
+    (japanese-jisx0208         #x21 #x6C)      ; \e$(B!l\e(B
+    (korean-ksc5601            #x21 #x47)      ; \e$(C!G\e(B
+    (chinese-cns11643-1                #x21 #x6B)      ; \e$(G!k\e(B
+    ))
+(define-char
+  '((name              . "DOUBLE PRIME")
+    (ucs               . #x2033)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   compat #x2032 #x2032)
+    (japanese-jisx0208-1978    #x21 #x6D)      ; \e$(@!m\e(B
+    (chinese-gb2312            #x21 #x65)      ; \e$(A!e\e(B
+    (japanese-jisx0208         #x21 #x6D)      ; \e$(B!m\e(B
+    (korean-ksc5601            #x21 #x48)      ; \e$(C!H\e(B
+    ))
+(define-char
+  '((name              . "TRIPLE PRIME")
+    (ucs               . #x2034)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   compat #x2032 #x2032 #x2032)
+    ))
+(define-char
+  '((name              . "REVERSED PRIME")
+    (ucs               . #x2035)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-cns11643-1 #x21 #x6A)     ; \e$(G!j\e(B
+    ))
+(define-char
+  '((name              . "REVERSED DOUBLE PRIME")
+    (ucs               . #x2036)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x2035 #x2035)
+    ))
+(define-char
+  '((name              . "REVERSED TRIPLE PRIME")
+    (ucs               . #x2037)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x2035 #x2035 #x2035)
+    ))
+(define-char
+  '((name              . "CARET")
+    (ucs               . #x2038)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "SINGLE LEFT-POINTING ANGLE QUOTATION MARK")
+    (ucs               . #x2039)
+    (general-category  punctuation initial-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    ))
+(define-char
+  '((name              . "SINGLE RIGHT-POINTING ANGLE QUOTATION MARK")
+    (ucs               . #x203A)
+    (general-category  punctuation final-quote) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    ))
+(define-char
+  '((name              . "REFERENCE MARK")
+    (ucs               . #x203B)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (japanese-jisx0208-1978    #x22 #x28)      ; \e$(@"(\e(B
+    (chinese-gb2312            #x21 #x79)      ; \e$(A!y\e(B
+    (japanese-jisx0208         #x22 #x28)      ; \e$(B"(\e(B
+    (korean-ksc5601            #x21 #x58)      ; \e$(C!X\e(B
+    (chinese-cns11643-1                #x21 #x6F)      ; \e$(G!o\e(B
+    ))
+(define-char
+  '((name              . "DOUBLE EXCLAMATION MARK")
+    (ucs               . #x203C)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x0021 #x0021)
+    ))
+(define-char
+  '((name              . "INTERROBANG")
+    (ucs               . #x203D)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "OVERLINE")
+    (ucs               . #x203E)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x0020 #x0305)
+    (latin-jisx0201    #x7E)   ; \e(J~\e(B
+    (hebrew-iso8859-8  #xAF)   ; \9b2]\e-H¯\9b0]\e-A
+    (japanese-jisx0208 #x21 #x31)      ; \e$(B!1\e(B
+    ))
+(define-char
+  '((name              . "FULLWIDTH OVERLINE")
+    (->ucs             . #x203E)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   wide #x203E)
+    (japanese-jisx0208-1978    #x21 #x31)      ; \e$(B!1\e(B
+    (japanese-jisx0208         #x21 #x31)      ; \e$(B!1\e(B
+    (chinese-cns11643-1                #x22 #x23)      ; \e$(G"#\e(B
+    ))
+(define-char
+  '((name              . "UNDERTIE")
+    (ucs               . #x203F)
+    (general-category  punctuation connector) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (iso-10646-comment . "Enotikon")
+    ))
+(define-char
+  '((name              . "CHARACTER TIE")
+    (ucs               . #x2040)
+    (general-category  punctuation connector) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "CARET INSERTION POINT")
+    (ucs               . #x2041)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ASTERISM")
+    (ucs               . #x2042)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "HYPHEN BULLET")
+    (ucs               . #x2043)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "FRACTION SLASH")
+    (ucs               . #x2044)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (chinese-cns11643-1 #x22 #x5F)     ; \e$(G"_\e(B
+    ))
+(define-char
+  '((name              . "LEFT SQUARE BRACKET WITH QUILL")
+    (ucs               . #x2045)
+    (general-category  punctuation open) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    ))
+(define-char
+  '((name              . "RIGHT SQUARE BRACKET WITH QUILL")
+    (ucs               . #x2046)
+    (general-category  punctuation close) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    ))
+(define-char
+  '((name              . "QUESTION EXCLAMATION MARK")
+    (ucs               . #x2048)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x003F #x0021)
+    ))
+(define-char
+  '((name              . "EXCLAMATION QUESTION MARK")
+    (ucs               . #x2049)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   compat #x0021 #x003F)
+    ))
+(define-char
+  '((name              . "TIRONIAN SIGN ET")
+    (ucs               . #x204A)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "REVERSED PILCROW SIGN")
+    (ucs               . #x204B)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "BLACK LEFTWARDS BULLET")
+    (ucs               . #x204C)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "BLACK RIGHTWARDS BULLET")
+    (ucs               . #x204D)
+    (general-category  punctuation other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "INHIBIT SYMMETRIC SWAPPING")
+    (ucs               . #x206A)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ACTIVATE SYMMETRIC SWAPPING")
+    (ucs               . #x206B)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "INHIBIT ARABIC FORM SHAPING")
+    (ucs               . #x206C)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "ACTIVATE ARABIC FORM SHAPING")
+    (ucs               . #x206D)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "NATIONAL DIGIT SHAPES")
+    (ucs               . #x206E)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "NOMINAL DIGIT SHAPES")
+    (ucs               . #x206F)
+    (general-category  other format) ; Normative Category
+    (bidi-category     . "BN")
+    (mirrored          . nil)
+    ))
diff --git a/lisp/utf-2000/u02070-Superscripts.el b/lisp/utf-2000/u02070-Superscripts.el
new file mode 100644 (file)
index 0000000..ac2b8ec
--- /dev/null
@@ -0,0 +1,146 @@
+(define-char
+  '((name              . "SUPERSCRIPT ZERO")
+    (ucs               . #x2070)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 0)
+    (digit-value        . 0)
+    (numeric-value      . 0)
+    (->decomposition   super #x0030)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT FOUR")
+    (ucs               . #x2074)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 4)
+    (digit-value        . 4)
+    (numeric-value      . 4)
+    (->decomposition   super #x0034)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUPERSCRIPT FOUR")
+    (->ucs             . #x2074)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 4)
+    (digit-value        . 4)
+    (numeric-value      . 4)
+    (->decomposition   wide #x2074)
+    (korean-ksc5601    #x29 #x79)      ; \e$(C)y\e(B
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT FIVE")
+    (ucs               . #x2075)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 5)
+    (digit-value        . 5)
+    (numeric-value      . 5)
+    (->decomposition   super #x0035)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT SIX")
+    (ucs               . #x2076)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 6)
+    (digit-value        . 6)
+    (numeric-value      . 6)
+    (->decomposition   super #x0036)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT SEVEN")
+    (ucs               . #x2077)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 7)
+    (digit-value        . 7)
+    (numeric-value      . 7)
+    (->decomposition   super #x0037)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT EIGHT")
+    (ucs               . #x2078)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 8)
+    (digit-value        . 8)
+    (numeric-value      . 8)
+    (->decomposition   super #x0038)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT NINE")
+    (ucs               . #x2079)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 9)
+    (digit-value        . 9)
+    (numeric-value      . 9)
+    (->decomposition   super #x0039)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT PLUS SIGN")
+    (ucs               . #x207A)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   super #x002B)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT MINUS")
+    (ucs               . #x207B)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   super #x2212)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT EQUALS SIGN")
+    (ucs               . #x207C)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   super #x003D)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT LEFT PARENTHESIS")
+    (ucs               . #x207D)
+    (general-category  punctuation open) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    (->decomposition   super #x0028)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT RIGHT PARENTHESIS")
+    (ucs               . #x207E)
+    (general-category  punctuation close) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    (->decomposition   super #x0029)
+    ))
+(define-char
+  '((name              . "SUPERSCRIPT LATIN SMALL LETTER N")
+    (ucs               . #x207F)
+    (general-category  letter lowercase) ; Normative Category
+    (bidi-category     . "L")
+    (mirrored          . nil)
+    (->decomposition   super #x006E)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUPERSCRIPT LATIN SMALL LETTER N")
+    (->ucs             . #x207F)
+    (general-category  letter lowercase) ; Normative Category
+    (bidi-category     . "L")
+    (mirrored          . nil)
+    (->decomposition   wide #x207F)
+    (korean-ksc5601    #x29 #x7A)      ; \e$(C)z\e(B
+    ))
diff --git a/lisp/utf-2000/u02080-Subscripts.el b/lisp/utf-2000/u02080-Subscripts.el
new file mode 100644 (file)
index 0000000..9683f02
--- /dev/null
@@ -0,0 +1,198 @@
+(define-char
+  '((name              . "SUBSCRIPT ZERO")
+    (ucs               . #x2080)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 0)
+    (digit-value        . 0)
+    (numeric-value      . 0)
+    (->decomposition   sub #x0030)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT ONE")
+    (ucs               . #x2081)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 1)
+    (digit-value        . 1)
+    (numeric-value      . 1)
+    (->decomposition   sub #x0031)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUBSCRIPT ONE")
+    (->ucs             . #x2081)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 1)
+    (digit-value        . 1)
+    (numeric-value      . 1)
+    (->decomposition   wide #x2081)
+    (korean-ksc5601    #x29 #x7B)      ; \e$(C){\e(B
+    ))
+(define-char
+  '((name              . "SUBSCRIPT TWO")
+    (ucs               . #x2082)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 2)
+    (digit-value        . 2)
+    (numeric-value      . 2)
+    (->decomposition   sub #x0032)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUBSCRIPT TWO")
+    (->ucs             . #x2082)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 2)
+    (digit-value        . 2)
+    (numeric-value      . 2)
+    (->decomposition   wide #x2082)
+    (korean-ksc5601    #x29 #x7C)      ; \e$(C)|\e(B
+    ))
+(define-char
+  '((name              . "SUBSCRIPT THREE")
+    (ucs               . #x2083)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 3)
+    (digit-value        . 3)
+    (numeric-value      . 3)
+    (->decomposition   sub #x0033)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUBSCRIPT THREE")
+    (->ucs             . #x2083)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 3)
+    (digit-value        . 3)
+    (numeric-value      . 3)
+    (->decomposition   wide #x2083)
+    (korean-ksc5601    #x29 #x7D)      ; \e$(C)}\e(B
+    ))
+(define-char
+  '((name              . "SUBSCRIPT FOUR")
+    (ucs               . #x2084)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 4)
+    (digit-value        . 4)
+    (numeric-value      . 4)
+    (->decomposition   sub #x0034)
+    ))
+(define-char
+  '((name              . "FULLWIDTH SUBSCRIPT FOUR")
+    (->ucs             . #x2084)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 4)
+    (digit-value        . 4)
+    (numeric-value      . 4)
+    (->decomposition   wide #x2084)
+    (korean-ksc5601    #x29 #x7E)      ; \e$(C)~\e(B
+    ))
+(define-char
+  '((name              . "SUBSCRIPT FIVE")
+    (ucs               . #x2085)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 5)
+    (digit-value        . 5)
+    (numeric-value      . 5)
+    (->decomposition   sub #x0035)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT SIX")
+    (ucs               . #x2086)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 6)
+    (digit-value        . 6)
+    (numeric-value      . 6)
+    (->decomposition   sub #x0036)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT SEVEN")
+    (ucs               . #x2087)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 7)
+    (digit-value        . 7)
+    (numeric-value      . 7)
+    (->decomposition   sub #x0037)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT EIGHT")
+    (ucs               . #x2088)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 8)
+    (digit-value        . 8)
+    (numeric-value      . 8)
+    (->decomposition   sub #x0038)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT NINE")
+    (ucs               . #x2089)
+    (general-category  number other) ; Normative Category
+    (bidi-category     . "EN")
+    (mirrored          . nil)
+    (decimal-digit-value . 9)
+    (digit-value        . 9)
+    (numeric-value      . 9)
+    (->decomposition   sub #x0039)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT PLUS SIGN")
+    (ucs               . #x208A)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   sub #x002B)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT MINUS")
+    (ucs               . #x208B)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   sub #x2212)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT EQUALS SIGN")
+    (ucs               . #x208C)
+    (general-category  symbol math) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (->decomposition   sub #x003D)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT LEFT PARENTHESIS")
+    (ucs               . #x208D)
+    (general-category  punctuation open) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    (->decomposition   sub #x0028)
+    ))
+(define-char
+  '((name              . "SUBSCRIPT RIGHT PARENTHESIS")
+    (ucs               . #x208E)
+    (general-category  punctuation close) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . t)
+    (->decomposition   sub #x0029)
+    ))
diff --git a/lisp/utf-2000/u020A0-Currency-Symbols.el b/lisp/utf-2000/u020A0-Currency-Symbols.el
new file mode 100644 (file)
index 0000000..c74b201
--- /dev/null
@@ -0,0 +1,113 @@
+(define-char
+  '((name              . "EURO-CURRENCY SIGN")
+    (ucs               . #x20A0)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COLON SIGN")
+    (ucs               . #x20A1)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "CRUZEIRO SIGN")
+    (ucs               . #x20A2)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "FRENCH FRANC SIGN")
+    (ucs               . #x20A3)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "LIRA SIGN")
+    (ucs               . #x20A4)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "MILL SIGN")
+    (ucs               . #x20A5)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "NAIRA SIGN")
+    (ucs               . #x20A6)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "PESETA SIGN")
+    (ucs               . #x20A7)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "RUPEE SIGN")
+    (ucs               . #x20A8)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    (->decomposition   compat #x0052 #x0073)
+    ))
+(define-char
+  '((name              . "WON SIGN")
+    (ucs               . #x20A9)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "NEW SHEQEL SIGN")
+    (ucs               . #x20AA)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "DONG SIGN")
+    (ucs               . #x20AB)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "EURO SIGN")
+    (ucs               . #x20AC)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "KIP SIGN")
+    (ucs               . #x20AD)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "TUGRIK SIGN")
+    (ucs               . #x20AE)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "DRACHMA SIGN")
+    (ucs               . #x20AF)
+    (general-category  symbol currency) ; Informative Category
+    (bidi-category     . "ET")
+    (mirrored          . nil)
+    ))
diff --git a/lisp/utf-2000/u020D0-Combining-Diacritical-Marks-for-Symbols.el b/lisp/utf-2000/u020D0-Combining-Diacritical-Marks-for-Symbols.el
new file mode 100644 (file)
index 0000000..3d777d0
--- /dev/null
@@ -0,0 +1,140 @@
+(define-char
+  '((name              . "COMBINING LEFT HARPOON ABOVE")
+    (ucs               . #x20D0)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING RIGHT HARPOON ABOVE")
+    (ucs               . #x20D1)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING LONG VERTICAL LINE OVERLAY")
+    (ucs               . #x20D2)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING SHORT VERTICAL LINE OVERLAY")
+    (ucs               . #x20D3)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ANTICLOCKWISE ARROW ABOVE")
+    (ucs               . #x20D4)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING CLOCKWISE ARROW ABOVE")
+    (ucs               . #x20D5)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING LEFT ARROW ABOVE")
+    (ucs               . #x20D6)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING RIGHT ARROW ABOVE")
+    (ucs               . #x20D7)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING RING OVERLAY")
+    (ucs               . #x20D8)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING CLOCKWISE RING OVERLAY")
+    (ucs               . #x20D9)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ANTICLOCKWISE RING OVERLAY")
+    (ucs               . #x20DA)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING THREE DOTS ABOVE")
+    (ucs               . #x20DB)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING FOUR DOTS ABOVE")
+    (ucs               . #x20DC)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING CIRCLE")
+    (ucs               . #x20DD)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING SQUARE")
+    (ucs               . #x20DE)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING DIAMOND")
+    (ucs               . #x20DF)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING CIRCLE BACKSLASH")
+    (ucs               . #x20E0)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING LEFT RIGHT ARROW ABOVE")
+    (ucs               . #x20E1)
+    (general-category  mark non-spacing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING SCREEN")
+    (ucs               . #x20E2)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))
+(define-char
+  '((name              . "COMBINING ENCLOSING KEYCAP")
+    (ucs               . #x20E3)
+    (general-category  mark enclosing) ; Normative Category
+    (bidi-category     . "NSM")
+    (mirrored          . nil)
+    ))