From: tomo <tomo>
Date: Wed, 10 Nov 2004 16:30:09 +0000 (+0000)
Subject: Use `=jis-x0208@{1983|1990}' instead of `=jis-x0208-{1983|1990}'.
X-Git-Tag: r21-4-15-u2km-0_21-32-a~2^2~48
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8120bce1d16ee1dd7f1c8fe5a05a365af507867a;p=chise%2Fxemacs-chise.git

Use `=jis-x0208@{1983|1990}' instead of `=jis-x0208-{1983|1990}'.
Separate CJK characters from UCS characters.
In each *fullwidth* variant:
- Use `<-denotational' instead of `=>ucs'.
- Omit features defined in the mother.
- Use `=ucs@jis/fw' instead of `=ucs@jis' except if the character
  has `=jis-x0208' or `=jis-x0208@1990' feature or it is a circled
  character.
In each ucs character:
- Omit `->fullwidth' for non-UCS objects.
(B-A145): Unify C1-2126 instead of C1-2131.
(C1-2224): Unify U+FFE3; don't map to U+203E; moved into
u0FF00-Halfwidth-and-Fullwidth-Forms.el.
(<FRACTION SLASH>): Separate C1-225F.
---

diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el
index 0c684de..d8fa776 100644
--- a/lisp/utf-2000/u02000-General-Punctuation.el
+++ b/lisp/utf-2000/u02000-General-Punctuation.el
@@ -129,7 +129,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2010)	; ‐
-    (=jis-x0208		. #x213E)	; &I-J90-213E; [01-30]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "HYPHEN")
+      (=ucs		  . #x2010)	; ‐
+      ))
+    (<-fullwidth
+     ((name		  . "HYPHEN")
+      (=ucs		  . #x2010)	; ‐
+      ))
+    (=jis-x0208		. #x213E)	; &J90-213E; [01-30]
+    (=ucs@jis		. #x2010)	; &J90-213E;
     ))
 (define-char
   '((name		. "NON-BREAKING HYPHEN")
@@ -152,9 +163,22 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2013)	; –
-    (=cns11643-1	. #x2139)	; &I-C1-2139; [01-25]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "EN DASH")
+      (=ucs		  . #x2013)	; –
+      ))
+    (<-fullwidth
+     ((name		  . "EN DASH")
+      (=ucs		  . #x2013)	; –
+      ))
+    (=cns11643-1	. #x2139)	; &JX1-237C; [01-25]
     (=jis-x0213-1-2000	. #x237C)	; &I-JX1-237C; [03-92]
     (=big5		. #xA156)	; &I-B-A156;
+    (=ucs@cns		. #x2013)	; &JX1-237C;
+    (=ucs@jis		. #x2013)	; &JX1-237C;
+    (=ucs@big5		. #x2013)	; &JX1-237C;
     ))
 (define-char
   '((name		. "EM DASH")
@@ -162,9 +186,22 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2014)	; —
-    (=jis-x0208		. #x213D)	; &I-J90-213D; [01-29]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "EM DASH")
+      (=ucs		  . #x2014)	; —
+      ))
+    (<-fullwidth
+     ((name		  . "EM DASH")
+      (=ucs		  . #x2014)	; —
+      ))
+    (=jis-x0208		. #x213D)	; &J90-213D; [01-29]
     (=cns11643-1	. #x2137)	; &I-C1-2137; [01-23]
     (=big5		. #xA158)	; &I-B-A158;
+    (=ucs@cns		. #x2014)	; &J90-213D;
+    (=ucs@jis		. #x2014)	; &J90-213D;
+    (=ucs@big5		. #x2014)	; &J90-213D;
     ))
 (define-char
   '((name		. "HORIZONTAL BAR")
@@ -172,17 +209,21 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2015)	; ―
-    (=gb2312		. #x212A)	; &I-G0-212A; [01-10]
-    (=ks-x1001		. #x212A)	; &I-K0-212A; [01-10]
+    (greek-iso8859-7	. #xAF)	; &I-GREEK-2F;
     ))
 (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)	; &GREEK-2F;
+  '((<-denotational
+     ((name		  . "HORIZONTAL BAR")
+      (=ucs		  . #x2015)	; ―
+      ))
+    (<-fullwidth
+     ((name		  . "HORIZONTAL BAR")
+      (=ucs		  . #x2015)	; ―
+      ))
+    (=gb2312		. #x212A)	; &K0-212A; [01-10]
+    (=ks-x1001		. #x212A)	; &I-K0-212A; [01-10]
+    (=ucs@gb		. #x2015)	; &K0-212A;
+    (=ucs@ks		. #x2015)	; &K0-212A;
     ))
 (define-char
   '((name		. "DOUBLE VERTICAL LINE")
@@ -190,9 +231,22 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2016)	; ‖
-    (=jis-x0208		. #x2142)	; &I-J90-2142; [01-34]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DOUBLE VERTICAL LINE")
+      (=ucs		  . #x2016)	; ‖
+      ))
+    (<-fullwidth
+     ((name		  . "DOUBLE VERTICAL LINE")
+      (=ucs		  . #x2016)	; ‖
+      ))
+    (=jis-x0208		. #x2142)	; &J90-2142; [01-34]
     (=gb2312		. #x212C)	; &I-G0-212C; [01-12]
     (=cns11643-1	. #x225D)	; &I-C1-225D; [02-61]
+    (=ucs@gb		. #x2016)	; &J90-2142;
+    (=ucs@cns		. #x2016)	; &J90-2142;
+    (=ucs@jis		. #x2016)	; &J90-2142;
     ))
 (define-char
   '((name		. "DOUBLE LOW LINE")
@@ -209,11 +263,26 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2018)	; ‘
-    (=jis-x0208		. #x2146)	; &I-J90-2146; [01-38]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "LEFT SINGLE QUOTATION MARK")
+      (=ucs		  . #x2018)	; ‘
+      ))
+    (<-fullwidth
+     ((name		  . "LEFT SINGLE QUOTATION MARK")
+      (=ucs		  . #x2018)	; ‘
+      ))
+    (=jis-x0208		. #x2146)	; &J90-2146; [01-38]
     (=gb2312		. #x212E)	; &I-G0-212E; [01-14]
     (=ks-x1001		. #x212E)	; &I-K0-212E; [01-14]
     (=cns11643-1	. #x2164)	; &I-C1-2164; [01-68]
     (=big5		. #xA1A5)	; &I-B-A1A5;
+    (=ucs@gb		. #x2018)	; &J90-2146;
+    (=ucs@cns		. #x2018)	; &J90-2146;
+    (=ucs@jis		. #x2018)	; &J90-2146;
+    (=ucs@ks		. #x2018)	; &J90-2146;
+    (=ucs@big5		. #x2018)	; &J90-2146;
     ))
 (define-char
   '((name		. "RIGHT SINGLE QUOTATION MARK")
@@ -221,11 +290,26 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2019)	; ’
-    (=jis-x0208		. #x2147)	; &I-J90-2147; [01-39]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "RIGHT SINGLE QUOTATION MARK")
+      (=ucs		  . #x2019)	; ’
+      ))
+    (<-fullwidth
+     ((name		  . "RIGHT SINGLE QUOTATION MARK")
+      (=ucs		  . #x2019)	; ’
+      ))
+    (=jis-x0208		. #x2147)	; &J90-2147; [01-39]
     (=gb2312		. #x212F)	; &I-G0-212F; [01-15]
     (=ks-x1001		. #x212F)	; &I-K0-212F; [01-15]
     (=cns11643-1	. #x2165)	; &I-C1-2165; [01-69]
     (=big5		. #xA1A6)	; &I-B-A1A6;
+    (=ucs@gb		. #x2019)	; &J90-2147;
+    (=ucs@cns		. #x2019)	; &J90-2147;
+    (=ucs@jis		. #x2019)	; &J90-2147;
+    (=ucs@ks		. #x2019)	; &J90-2147;
+    (=ucs@big5		. #x2019)	; &J90-2147;
     ))
 (define-char
   '((name		. "SINGLE LOW-9 QUOTATION MARK")
@@ -247,11 +331,26 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x201C)	; “
-    (=jis-x0208		. #x2148)	; &I-J90-2148; [01-40]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "LEFT DOUBLE QUOTATION MARK")
+      (=ucs		  . #x201C)	; “
+      ))
+    (<-fullwidth
+     ((name		  . "LEFT DOUBLE QUOTATION MARK")
+      (=ucs		  . #x201C)	; “
+      ))
+    (=jis-x0208		. #x2148)	; &J90-2148; [01-40]
     (=gb2312		. #x2130)	; &I-G0-2130; [01-16]
     (=ks-x1001		. #x2130)	; &I-K0-2130; [01-16]
     (=cns11643-1	. #x2166)	; &I-C1-2166; [01-70]
     (=big5		. #xA1A7)	; &I-B-A1A7;
+    (=ucs@gb		. #x201C)	; &J90-2148;
+    (=ucs@cns		. #x201C)	; &J90-2148;
+    (=ucs@jis		. #x201C)	; &J90-2148;
+    (=ucs@ks		. #x201C)	; &J90-2148;
+    (=ucs@big5		. #x201C)	; &J90-2148;
     ))
 (define-char
   '((name		. "RIGHT DOUBLE QUOTATION MARK")
@@ -259,11 +358,26 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x201D)	; ”
-    (=jis-x0208		. #x2149)	; &I-J90-2149; [01-41]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "RIGHT DOUBLE QUOTATION MARK")
+      (=ucs		  . #x201D)	; ”
+      ))
+    (<-fullwidth
+     ((name		  . "RIGHT DOUBLE QUOTATION MARK")
+      (=ucs		  . #x201D)	; ”
+      ))
+    (=jis-x0208		. #x2149)	; &J90-2149; [01-41]
     (=gb2312		. #x2131)	; &I-G0-2131; [01-17]
     (=ks-x1001		. #x2131)	; &I-K0-2131; [01-17]
     (=cns11643-1	. #x2167)	; &I-C1-2167; [01-71]
     (=big5		. #xA1A8)	; &I-B-A1A8;
+    (=ucs@gb		. #x201D)	; &J90-2149;
+    (=ucs@cns		. #x201D)	; &J90-2149;
+    (=ucs@jis		. #x201D)	; &J90-2149;
+    (=ucs@ks		. #x201D)	; &J90-2149;
+    (=ucs@big5		. #x201D)	; &J90-2149;
     ))
 (define-char
   '((name		. "DOUBLE LOW-9 QUOTATION MARK")
@@ -285,9 +399,21 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2020)	; †
-    (=jis-x0208-1983	. #x2277)	; &I-J83-2277; [02-87]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DAGGER")
+      (=ucs		  . #x2020)	; †
+      ))
+    (<-fullwidth
+     ((name		  . "DAGGER")
+      (=ucs		  . #x2020)	; †
+      ))
+    (=jis-x0208@1983	. #x2277)	; &J90-2277; [02-87]
     (=ks-x1001		. #x2253)	; &I-K0-2253; [02-51]
-    (=jis-x0208-1990	. #x2277)	; &I-J90-2277; [02-87]
+    (=jis-x0208@1990	. #x2277)	; &I-J90-2277; [02-87]
+    (=ucs@jis		. #x2020)	; &J90-2277;
+    (=ucs@ks		. #x2020)	; &J90-2277;
     ))
 (define-char
   '((name		. "DOUBLE DAGGER")
@@ -295,9 +421,21 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2021)	; ‡
-    (=jis-x0208-1983	. #x2278)	; &I-J83-2278; [02-88]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DOUBLE DAGGER")
+      (=ucs		  . #x2021)	; ‡
+      ))
+    (<-fullwidth
+     ((name		  . "DOUBLE DAGGER")
+      (=ucs		  . #x2021)	; ‡
+      ))
+    (=jis-x0208@1983	. #x2278)	; &J90-2278; [02-88]
     (=ks-x1001		. #x2254)	; &I-K0-2254; [02-52]
-    (=jis-x0208-1990	. #x2278)	; &I-J90-2278; [02-88]
+    (=jis-x0208@1990	. #x2278)	; &I-J90-2278; [02-88]
+    (=ucs@jis		. #x2021)	; &J90-2278;
+    (=ucs@ks		. #x2021)	; &J90-2278;
     ))
 (define-char
   '((name		. "BULLET")
@@ -305,7 +443,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2022)	; •
-    (=jis-x0213-1-2000	. #x2340)	; &I-JX1-2340; [03-32]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "BULLET")
+      (=ucs		  . #x2022)	; •
+      ))
+    (<-fullwidth
+     ((name		  . "BULLET")
+      (=ucs		  . #x2022)	; •
+      ))
+    (=jis-x0213-1-2000	. #x2340)	; &JX1-2340; [03-32]
+    (=ucs@jis/fw	. #x2022)	; &JX1-2340;
     ))
 (define-char
   '((name		. "TRIANGULAR BULLET")
@@ -329,10 +478,24 @@
     (mirrored		. nil)
     (->decomposition	compat #x002E #x002E)
     (=ucs		. #x2025)	; ‥
-    (=jis-x0208		. #x2145)	; &I-J90-2145; [01-37]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "TWO DOT LEADER")
+      (=ucs		  . #x2025)	; ‥
+      ))
+    (<-fullwidth
+     ((name		  . "TWO DOT LEADER")
+      (=ucs		  . #x2025)	; ‥
+      ))
+    (=jis-x0208		. #x2145)	; &J90-2145; [01-37]
     (=ks-x1001		. #x2125)	; &I-K0-2125; [01-05]
     (=cns11643-1	. #x212D)	; &I-C1-212D; [01-13]
     (=big5		. #xA14C)	; &I-B-A14C;
+    (=ucs@cns		. #x2025)	; &J90-2145;
+    (=ucs@jis		. #x2025)	; &J90-2145;
+    (=ucs@ks		. #x2025)	; &J90-2145;
+    (=ucs@big5		. #x2025)	; &J90-2145;
     ))
 (define-char
   '((name		. "HORIZONTAL ELLIPSIS")
@@ -341,11 +504,26 @@
     (mirrored		. nil)
     (->decomposition	compat #x002E #x002E #x002E)
     (=ucs		. #x2026)	; …
-    (=jis-x0208		. #x2144)	; &I-J90-2144; [01-36]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "HORIZONTAL ELLIPSIS")
+      (=ucs		  . #x2026)	; …
+      ))
+    (<-fullwidth
+     ((name		  . "HORIZONTAL ELLIPSIS")
+      (=ucs		  . #x2026)	; …
+      ))
+    (=jis-x0208		. #x2144)	; &J90-2144; [01-36]
     (=gb2312		. #x212D)	; &I-G0-212D; [01-13]
     (=ks-x1001		. #x2126)	; &I-K0-2126; [01-06]
     (=cns11643-1	. #x212C)	; &I-C1-212C; [01-12]
     (=big5		. #xA14B)	; &I-B-A14B;
+    (=ucs@gb		. #x2026)	; &J90-2144;
+    (=ucs@cns		. #x2026)	; &J90-2144;
+    (=ucs@jis		. #x2026)	; &J90-2144;
+    (=ucs@ks		. #x2026)	; &J90-2144;
+    (=ucs@big5		. #x2026)	; &J90-2144;
     ))
 (define-char
   '((name		. "HYPHENATION POINT")
@@ -353,8 +531,20 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2027)	; ‧
-    (=cns11643-1	. #x2131)	; &I-C1-2131; [01-17]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "HYPHENATION POINT")
+      (=ucs		  . #x2027)	; ‧
+      ))
+    (<-fullwidth
+     ((name		  . "HYPHENATION POINT")
+      (=ucs		  . #x2027)	; ‧
+      ))
+    (=cns11643-1	. #x2126)	; &C1-2126; [01-06]
     (=big5		. #xA145)	; &I-B-A145;
+    (=ucs@cns		. #x2027)	; &C1-2126;
+    (=ucs@big5		. #x2027)	; &C1-2126;
     ))
 (define-char
   '((name		. "LINE SEPARATOR")
@@ -419,10 +609,23 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (=ucs		. #x2030)	; ‰
-    (=gb2312		. #x216B)	; &I-G0-216B; [01-75]
-    (=jis-x0208-1983	. #x2273)	; &I-J83-2273; [02-83]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "PER MILLE SIGN")
+      (=ucs		  . #x2030)	; ‰
+      ))
+    (<-fullwidth
+     ((name		  . "PER MILLE SIGN")
+      (=ucs		  . #x2030)	; ‰
+      ))
+    (=gb2312		. #x216B)	; &J90-2273; [01-75]
+    (=jis-x0208@1983	. #x2273)	; &I-J83-2273; [02-83]
     (=ks-x1001		. #x2236)	; &I-K0-2236; [02-22]
-    (=jis-x0208-1990	. #x2273)	; &I-J90-2273; [02-83]
+    (=jis-x0208@1990	. #x2273)	; &I-J90-2273; [02-83]
+    (=ucs@gb		. #x2030)	; &J90-2273;
+    (=ucs@jis		. #x2030)	; &J90-2273;
+    (=ucs@ks		. #x2030)	; &J90-2273;
     ))
 (define-char
   '((name		. "PER TEN THOUSAND SIGN")
@@ -437,11 +640,26 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (=ucs		. #x2032)	; ′
-    (=jis-x0208		. #x216C)	; &I-J90-216C; [01-76]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "PRIME")
+      (=ucs		  . #x2032)	; ′
+      ))
+    (<-fullwidth
+     ((name		  . "PRIME")
+      (=ucs		  . #x2032)	; ′
+      ))
+    (=jis-x0208		. #x216C)	; &J90-216C; [01-76]
     (=gb2312		. #x2164)	; &I-G0-2164; [01-68]
     (=ks-x1001		. #x2147)	; &I-K0-2147; [01-39]
     (=cns11643-1	. #x216B)	; &I-C1-216B; [01-75]
     (=big5		. #xA1AC)	; &I-B-A1AC;
+    (=ucs@gb		. #x2032)	; &J90-216C;
+    (=ucs@cns		. #x2032)	; &J90-216C;
+    (=ucs@jis		. #x2032)	; &J90-216C;
+    (=ucs@ks		. #x2032)	; &J90-216C;
+    (=ucs@big5		. #x2032)	; &J90-216C;
     ))
 (define-char
   '((name		. "DOUBLE PRIME")
@@ -450,9 +668,22 @@
     (mirrored		. nil)
     (->decomposition	compat #x2032 #x2032)
     (=ucs		. #x2033)	; ″
-    (=jis-x0208		. #x216D)	; &I-J90-216D; [01-77]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DOUBLE PRIME")
+      (=ucs		  . #x2033)	; ″
+      ))
+    (<-fullwidth
+     ((name		  . "DOUBLE PRIME")
+      (=ucs		  . #x2033)	; ″
+      ))
+    (=jis-x0208		. #x216D)	; &J90-216D; [01-77]
     (=gb2312		. #x2165)	; &I-G0-2165; [01-69]
     (=ks-x1001		. #x2148)	; &I-K0-2148; [01-40]
+    (=ucs@gb		. #x2033)	; &J90-216D;
+    (=ucs@jis		. #x2033)	; &J90-216D;
+    (=ucs@ks		. #x2033)	; &J90-216D;
     ))
 (define-char
   '((name		. "TRIPLE PRIME")
@@ -468,8 +699,20 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2035)	; ‵
-    (=cns11643-1	. #x216A)	; &I-C1-216A; [01-74]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "REVERSED PRIME")
+      (=ucs		  . #x2035)	; ‵
+      ))
+    (<-fullwidth
+     ((name		  . "REVERSED PRIME")
+      (=ucs		  . #x2035)	; ‵
+      ))
+    (=cns11643-1	. #x216A)	; &C1-216A; [01-74]
     (=big5		. #xA1AB)	; &I-B-A1AB;
+    (=ucs@cns		. #x2035)	; &C1-216A;
+    (=ucs@big5		. #x2035)	; &C1-216A;
     ))
 (define-char
   '((name		. "REVERSED DOUBLE PRIME")
@@ -514,11 +757,26 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x203B)	; ※
-    (=jis-x0208		. #x2228)	; &I-J90-2228; [02-08]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "REFERENCE MARK")
+      (=ucs		  . #x203B)	; ※
+      ))
+    (<-fullwidth
+     ((name		  . "REFERENCE MARK")
+      (=ucs		  . #x203B)	; ※
+      ))
+    (=jis-x0208		. #x2228)	; &J90-2228; [02-08]
     (=gb2312		. #x2179)	; &I-G0-2179; [01-89]
     (=ks-x1001		. #x2158)	; &I-K0-2158; [01-56]
     (=cns11643-1	. #x216F)	; &I-C1-216F; [01-79]
     (=big5		. #xA1B0)	; &I-B-A1B0;
+    (=ucs@gb		. #x203B)	; &J90-2228;
+    (=ucs@cns		. #x203B)	; &J90-2228;
+    (=ucs@jis		. #x203B)	; &J90-2228;
+    (=ucs@ks		. #x203B)	; &J90-2228;
+    (=ucs@big5		. #x203B)	; &J90-2228;
     ))
 (define-char
   '((name		. "DOUBLE EXCLAMATION MARK")
@@ -527,7 +785,18 @@
     (mirrored		. nil)
     (->decomposition	compat #x0021 #x0021)
     (=ucs		. #x203C)	; ‼
-    (=jis-x0213-1-2000	. #x286B)	; &I-JX1-286B; [08-75]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DOUBLE EXCLAMATION MARK")
+      (=ucs		  . #x203C)	; ‼
+      ))
+    (<-fullwidth
+     ((name		  . "DOUBLE EXCLAMATION MARK")
+      (=ucs		  . #x203C)	; ‼
+      ))
+    (=jis-x0213-1-2000	. #x286B)	; &JX1-286B; [08-75]
+    (=ucs@jis		. #x203C)	; &JX1-286B;
     ))
 (define-char
   '((name		. "INTERROBANG")
@@ -542,34 +811,16 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0020 #x0305)
-    (->fullwidth
-     ((name		  . "FULLWIDTH OVERLINE")
-      (=jis-x0208	  . #x2131)	; &J90-2131; [01-17]
-      (=gb2312		  . #x237E)	; &I-G0-237E; [03-94]
-      (=ks-x1001	  . #x237E)	; &I-K0-237E; [03-94]
-      (=cns11643-1	  . #x2223)	; &I-C1-2223; [02-03]
-      ))
     (=ucs		. #x203E)	; ‾
     (latin-jisx0201	. #x7E)	; &I-LATINJ-7E;
     (hebrew-iso8859-8	. #xAF)	; &I-HEBREW-2F;
     ))
 (define-char
-  '((name		. "heavy overline")
-    (=>ucs		. #x203E)	; ‾
-    (general-category	punctuation other) ; Informative Category
-    (bidi-category	. "ON")
-    (mirrored		. nil)
-    (=cns11643-1	. #x2224)	; &C1-2224; [02-04]
-    (=big5		. #xA1C3)	; &I-B-A1C3;
-    (=ucs@big5		. #xFFE3)	; &C1-2224;
-    ))
-(define-char
   '((name		. "FULLWIDTH OVERLINE")
-    (=>ucs		. #x203E)	; ‾
-    (general-category	punctuation other) ; Informative Category
-    (bidi-category	. "ON")
-    (mirrored		. nil)
-    (->decomposition	wide #x203E)
+    (<-denotational
+     ((name		  . "OVERLINE")
+      (=ucs		  . #x203E)	; ‾
+      ))
     (<-fullwidth
      ((name		  . "OVERLINE")
       (=ucs		  . #x203E)	; ‾
@@ -609,7 +860,18 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2042)	; ⁂
-    (=jis-x0213-1-2000	. #x2C7E)	; &I-JX1-2C7E; [12-94]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "ASTERISM")
+      (=ucs		  . #x2042)	; ⁂
+      ))
+    (<-fullwidth
+     ((name		  . "ASTERISM")
+      (=ucs		  . #x2042)	; ⁂
+      ))
+    (=jis-x0213-1-2000	. #x2C7E)	; &JX1-2C7E; [12-94]
+    (=ucs@jis		. #x2042)	; &JX1-2C7E;
     ))
 (define-char
   '((name		. "HYPHEN BULLET")
@@ -624,7 +886,6 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (=ucs		. #x2044)	; ⁄
-    (=cns11643-1	. #x225F)	; &I-C1-225F; [02-63]
     ))
 (define-char
   '((name		. "LEFT SQUARE BRACKET WITH QUILL")
@@ -642,8 +903,20 @@
     ))
 (define-char
   '((name		. "DOUBLE QUESTION MARK")
+    (general-category	punctuation other) ; Informative Category
     (=ucs		. #x2047)	; ⁇
-    (=jis-x0213-1-2000	. #x286C)	; &I-JX1-286C; [08-76]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "DOUBLE QUESTION MARK")
+      (=ucs		  . #x2047)	; ⁇
+      ))
+    (<-fullwidth
+     ((name		  . "DOUBLE QUESTION MARK")
+      (=ucs		  . #x2047)	; ⁇
+      ))
+    (=jis-x0213-1-2000	. #x286C)	; &JX1-286C; [08-76]
+    (=ucs@jis		. #x2047)	; &JX1-286C;
     ))
 (define-char
   '((name		. "QUESTION EXCLAMATION MARK")
@@ -652,7 +925,19 @@
     (mirrored		. nil)
     (->decomposition	compat #x003F #x0021)
     (=ucs		. #x2048)	; ⁈
-    (=jis-x0213-1-2000	. #x286D)	; &I-JX1-286D; [08-77]
+    ))
+(define-char
+  '((->decomposition	compat #xFF1F #xFF01)
+    (<-denotational
+     ((name		  . "QUESTION EXCLAMATION MARK")
+      (=ucs		  . #x2048)	; ⁈
+      ))
+    (<-fullwidth
+     ((name		  . "QUESTION EXCLAMATION MARK")
+      (=ucs		  . #x2048)	; ⁈
+      ))
+    (=jis-x0213-1-2000	. #x286D)	; &JX1-286D; [08-77]
+    (=ucs@jis		. #x2048)	; &JX1-286D;
     ))
 (define-char
   '((name		. "EXCLAMATION QUESTION MARK")
@@ -661,7 +946,18 @@
     (mirrored		. nil)
     (->decomposition	compat #x0021 #x003F)
     (=ucs		. #x2049)	; ⁉
-    (=jis-x0213-1-2000	. #x286E)	; &I-JX1-286E; [08-78]
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "EXCLAMATION QUESTION MARK")
+      (=ucs		  . #x2049)	; ⁉
+      ))
+    (<-fullwidth
+     ((name		  . "EXCLAMATION QUESTION MARK")
+      (=ucs		  . #x2049)	; ⁉
+      ))
+    (=jis-x0213-1-2000	. #x286E)	; &JX1-286E; [08-78]
+    (=ucs@jis		. #x2049)	; &JX1-286E;
     ))
 (define-char
   '((name		. "TIRONIAN SIGN ET")