Reformatted.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u03000-CJK-Symbols-and-Punctuation.el

diff --git a/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el b/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
index e76ab68..cde549c 100644 (file)
--- a/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
+++ b/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
@@ -4,16 +4,16 @@
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (<-ideographic
-     ((name              . "SPACE")
-      (=ucs              . #x0020)     ;
-      ))
     (=ucs              . #x3000)       ; 　
     (=jis-x0208                . #x2121)       ; &I-J90-2121; [01-01]
     (=gb2312           . #x2121)       ; &I-G0-2121; [01-01]
     (=ks-x1001         . #x2121)       ; &I-K0-2121; [01-01]
     (=cns11643-1       . #x2121)       ; &I-C1-2121; [01-01]
     (=big5             . #xA140)       ; &I-B-A140;
+    (<-ideographic
+     ((name              . "SPACE")
+      (=ucs              . #x0020)     ;
+      ))
     ))
 (define-char
   '((name              . "IDEOGRAPHIC COMMA")
@@ -101,10 +101,6 @@
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (<-canonical
-     ((name              . "LEFT-POINTING ANGLE BRACKET")
-      (=ucs              . #x2329)     ; 〈
-      ))
     (=ucs              . #x3008)       ; 〈
     (=jis-x0208                . #x2152)       ; &I-J90-2152; [01-50]
     (=gb2312           . #x2134)       ; &I-G0-2134; [01-20]
@@ -117,10 +113,6 @@
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (<-canonical
-     ((name              . "RIGHT-POINTING ANGLE BRACKET")
-      (=ucs              . #x232A)     ; 〉
-      ))
     (=ucs              . #x3009)       ; 〉
     (=jis-x0208                . #x2153)       ; &I-J90-2153; [01-51]
     (=gb2312           . #x2135)       ; &I-G0-2135; [01-21]
@@ -322,7 +314,21 @@
     (bidi-category     . "ON")
     (mirrored          . nil)
     (=ucs              . #x301C)       ; 〜
-    (=jis-x0208                . #x2141)       ; &I-J90-2141; [01-33]
+    ))
+(define-char
+  '((<-denotational
+     ((name              . "WAVE DASH")
+      (=ucs              . #x301C)     ; 〜
+      ))
+    (=ucs@unicode      . #x301C)       ; &UU+301C;
+    ))
+(define-char
+  '((<-denotational
+     ((name              . "WAVE DASH")
+      (=ucs              . #x301C)     ; 〜
+      ))
+    (=jis-x0208                . #x2141)       ; &J90-2141; [01-33]
+    (=ucs@jis          . #x301C)       ; &J90-2141;
     ))
 (define-char
   '((name              . "REVERSED DOUBLE PRIME QUOTATION MARK")
@@ -541,11 +547,11 @@
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x3036)       ; 〶
     (<-compat/circled
      ((name              . "POSTAL MARK")
       (=ucs              . #x3012)     ; 〒
       ))
-    (=ucs              . #x3036)       ; 〶
     ))
 (define-char
   '((name . "IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL")
@@ -560,12 +566,12 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 10)
-    (<-compat/Hangzhou-Numeral
-     ((=ucs              . #x5341)     ; 十
-      ))
     (=ucs              . #x3038)       ; 〸
     (=cns11643-1       . #x243E)       ; &I-C1-243E; [04-30]
     (=big5             . #xA2CC)       ; &I-B-A2CC;
+    (<-compat/Hangzhou-Numeral
+     ((=ucs              . #x5341)     ; 十
+      ))
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL TWENTY")
@@ -573,12 +579,12 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 20)
-    (<-compat/Hangzhou-Numeral
-     ((=ucs              . #x5344)     ; 卄
-      ))
     (=ucs              . #x3039)       ; 〹
     (=cns11643-1       . #x243F)       ; &I-C1-243F; [04-31]
     (=big5             . #xA2CD)       ; &I-B-A2CD;
+    (<-compat/Hangzhou-Numeral
+     ((=ucs              . #x5344)     ; 卄
+      ))
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL THIRTY")
@@ -586,12 +592,12 @@
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 30)
-    (<-compat/Hangzhou-Numeral
-     ((=ucs              . #x5345)     ; 卅
-      ))
     (=ucs              . #x303A)       ; 〺
     (=cns11643-1       . #x2440)       ; &I-C1-2440; [04-32]
     (=big5             . #xA2CE)       ; &I-B-A2CE;
+    (<-compat/Hangzhou-Numeral
+     ((=ucs              . #x5345)     ; 卅
+      ))
     ))
 (define-char
   '((name              . "VERTICAL IDEOGRAPHIC ITERATION MARK")