(<CJK RADICAL EYE>): Copied from u02E00-CJK-Radical-Supplement.el.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u02000-General-Punctuation.el

diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el
index 7da6694..522d80b 100644 (file)
--- a/lisp/utf-2000/u02000-General-Punctuation.el
+++ b/lisp/utf-2000/u02000-General-Punctuation.el
@@ -4,30 +4,29 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
+    (=ucs              . #x2000)       ;  
+    (->canonical
      ((name              . "EN SPACE")
       (=ucs              . #x2002)     ;  
       ))
-    (=ucs              . #x2000)       ;  
     ))
 (define-char
   '((name              . "EM QUAD")
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
+    (=ucs              . #x2001)       ;  
+    (->canonical
      ((name              . "EM SPACE")
       (=ucs              . #x2003)     ;  
       ))
-    (=ucs              . #x2001)       ;  
     ))
 (define-char
   '((name              . "EN SPACE")
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -38,8 +37,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -51,8 +49,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -63,8 +60,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -75,8 +71,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -87,8 +82,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     noBreak
+    (<-noBreak
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -99,8 +93,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -111,8 +104,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -123,8 +115,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -189,8 +180,7 @@
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     noBreak
+    (<-noBreak
      ((name              . "HYPHEN")
       (=ucs              . #x2010)     ; ‐
       ))
@@ -299,8 +289,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       )
@@ -521,8 +510,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (<-compat
      ((name              . "FULL STOP")
       (=ucs              . #x002E)     ; .
       ))
@@ -533,8 +521,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "FULL STOP")
       (=ucs              . #x002E)     ; .
       )
@@ -566,8 +553,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "FULL STOP")
       (=ucs              . #x002E)     ; .
       )
@@ -674,8 +660,7 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (=decomposition
-     noBreak
+    (<-noBreak
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       ))
@@ -744,8 +729,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "PRIME")
       (=ucs              . #x2032)     ; ′
       )
@@ -775,8 +759,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ET")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "PRIME")
       (=ucs              . #x2032)     ; ′
       )
@@ -814,8 +797,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "REVERSED PRIME")
       (=ucs              . #x2035)     ; ‵
       )
@@ -829,8 +811,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "REVERSED PRIME")
       (=ucs              . #x2035)     ; ‵
       )
@@ -895,8 +876,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "EXCLAMATION MARK")
       (=ucs              . #x0021)     ; !
       )
@@ -929,8 +909,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "SPACE")
       (=ucs              . #x0020)     ;
       )
@@ -1031,6 +1010,13 @@
 (define-char
   '((name              . "DOUBLE QUESTION MARK")
     (general-category  punctuation other) ; Informative Category
+    (=>decomposition@compat
+     ((name              . "QUESTION MARK")
+      (=ucs              . #x003F)     ; ?
+      )
+     ((name              . "QUESTION MARK")
+      (=ucs              . #x003F)     ; ?
+      ))
     (=ucs              . #x2047)       ; ⁇
     ))
 (define-char
@@ -1050,8 +1036,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "QUESTION MARK")
       (=ucs              . #x003F)     ; ?
       )
@@ -1077,8 +1062,7 @@
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (=decomposition
-     compat
+    (=>decomposition@compat
      ((name              . "EXCLAMATION MARK")
       (=ucs              . #x0021)     ; !
       )