X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02000-General-Punctuation.el;h=76d71ea81ba8f163e2cc488824704ae3b53d1450;hb=af4ff49f16fa1ea5454beb46ff8d5a0b2802988a;hp=7d47a449279b7b32e1c6c7f8b79ce51c086e06d2;hpb=44fc8b52d4a2ba527444ee4df0de9d4ea06785aa;p=chise%2Fxemacs-chise.git.1 diff --git a/lisp/utf-2000/u02000-General-Punctuation.el b/lisp/utf-2000/u02000-General-Punctuation.el index 7d47a44..76d71ea 100644 --- a/lisp/utf-2000/u02000-General-Punctuation.el +++ b/lisp/utf-2000/u02000-General-Punctuation.el @@ -1,3 +1,4 @@ +;; -*- coding: utf-8-mcs -*- (define-char '((name . "EN QUAD") (general-category separator space) ; Normative Category @@ -28,8 +29,8 @@ (bidi-category . "WS") (mirrored . nil) (->decomposition compat #x0020) - (=cns11643-1 . #x256D) ; ø»‘‰  (=ucs . #x2003) ;   + (=cns11643-1 . #x256D) ; ø»‘‰  )) (define-char '((name . "THREE-PER-EM SPACE") @@ -127,8 +128,8 @@ (general-category punctuation dash) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=jis-x0208 . #x213E) ; ø½‰¶™ (=ucs . #x2010) ; ‐ + (=jis-x0208 . #x213E) ; ø½‰¶™ )) (define-char '((name . "NON-BREAKING HYPHEN") @@ -150,29 +151,29 @@ (general-category punctuation dash) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2013) ; – (=cns11643-1 . #x2139) ; ø»‘‚´ (=jis-x0213-1-2000 . #x237C) ; ø»¢—“ (=big5 . #xA156) ; ý¢€Š…– - (=ucs . #x2013) ; – )) (define-char '((name . "EM DASH") (general-category punctuation dash) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2014) ; — (=jis-x0208 . #x213D) ; ø½‰¶˜ (=cns11643-1 . #x2137) ; ø»‘‚² (=big5 . #xA158) ; ý¢€Š…˜ - (=ucs . #x2014) ; — )) (define-char '((name . "HORIZONTAL BAR") (general-category punctuation dash) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2015) ; ― (=gb2312 . #x212A) ; ø»„† (=ks-x1001 . #x212A) ; ø»ˆš• - (=ucs . #x2015) ; ― )) (define-char '((name . "HALFWIDTH HORIZONTAL BAR") @@ -188,10 +189,10 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x212C) ; ø»„† + (=ucs . #x2016) ; ‖ (=jis-x0208 . #x2142) ; ø½‰¶ + (=gb2312 . #x212C) ; ø»„† (=cns11643-1 . #x225D) ; ø»‘„¶ - (=ucs . #x2016) ; ‖ )) (define-char '((name . "DOUBLE LOW LINE") @@ -199,32 +200,32 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x0020 #x0333) - (hebrew-iso8859-8 . #xDF) ; øº’¿Ÿ (=ucs . #x2017) ; ‗ + (hebrew-iso8859-8 . #xDF) ; øº’¿Ÿ )) (define-char '((name . "LEFT SINGLE QUOTATION MARK") (general-category punctuation initial-quote) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x212E) ; ø»„†‘ + (=ucs . #x2018) ; ‘ (=jis-x0208 . #x2146) ; ø½‰¶¡ + (=gb2312 . #x212E) ; ø»„†‘ (=ks-x1001 . #x212E) ; ø»ˆš™ (=cns11643-1 . #x2164) ; ø»‘ƒŸ (=big5 . #xA1A5) ; ý¢€Š†¥ - (=ucs . #x2018) ; ‘ )) (define-char '((name . "RIGHT SINGLE QUOTATION MARK") (general-category punctuation final-quote) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x212F) ; ø»„†’ + (=ucs . #x2019) ; ’ (=jis-x0208 . #x2147) ; ø½‰¶¢ + (=gb2312 . #x212F) ; ø»„†’ (=ks-x1001 . #x212F) ; ø»ˆšš (=cns11643-1 . #x2165) ; ø»‘ƒ  (=big5 . #xA1A6) ; ý¢€Š†¦ - (=ucs . #x2019) ; ’ )) (define-char '((name . "SINGLE LOW-9 QUOTATION MARK") @@ -245,24 +246,24 @@ (general-category punctuation initial-quote) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x2130) ; ø»„†“ + (=ucs . #x201C) ; “ (=jis-x0208 . #x2148) ; ø½‰¶£ + (=gb2312 . #x2130) ; ø»„†“ (=ks-x1001 . #x2130) ; ø»ˆš› (=cns11643-1 . #x2166) ; ø»‘ƒ¡ (=big5 . #xA1A7) ; ý¢€Š†§ - (=ucs . #x201C) ; “ )) (define-char '((name . "RIGHT DOUBLE QUOTATION MARK") (general-category punctuation final-quote) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x2131) ; ø»„†” + (=ucs . #x201D) ; ” (=jis-x0208 . #x2149) ; ø½‰¶¤ + (=gb2312 . #x2131) ; ø»„†” (=ks-x1001 . #x2131) ; ø»ˆšœ (=cns11643-1 . #x2167) ; ø»‘ƒ¢ (=big5 . #xA1A8) ; ý¢€Š†¨ - (=ucs . #x201D) ; ” )) (define-char '((name . "DOUBLE LOW-9 QUOTATION MARK") @@ -283,28 +284,28 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2020) ; † (=jis-x0208-1983 . #x2277) ; ø»†’¼ (=ks-x1001 . #x2253) ; ø»ˆœœ (=jis-x0208-1990 . #x2277) ; ø½‰¸° - (=ucs . #x2020) ; † )) (define-char '((name . "DOUBLE DAGGER") (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2021) ; ‡ (=jis-x0208-1983 . #x2278) ; ø»†’½ (=ks-x1001 . #x2254) ; ø»ˆœ (=jis-x0208-1990 . #x2278) ; ø½‰¸± - (=ucs . #x2021) ; ‡ )) (define-char '((name . "BULLET") (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=jis-x0213-1-2000 . #x2340) ; ø»¢–— (=ucs . #x2022) ; • + (=jis-x0213-1-2000 . #x2340) ; ø»¢–— )) (define-char '((name . "TRIANGULAR BULLET") @@ -327,11 +328,11 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x002E #x002E) + (=ucs . #x2025) ; ‥ (=jis-x0208 . #x2145) ; ø½‰¶  (=ks-x1001 . #x2125) ; ø»ˆš (=cns11643-1 . #x212D) ; ø»‘‚¨ (=big5 . #xA14C) ; ý¢€Š…Œ - (=ucs . #x2025) ; ‥ )) (define-char '((name . "HORIZONTAL ELLIPSIS") @@ -339,21 +340,21 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x002E #x002E #x002E) - (=gb2312 . #x212D) ; ø»„† + (=ucs . #x2026) ; … (=jis-x0208 . #x2144) ; ø½‰¶Ÿ + (=gb2312 . #x212D) ; ø»„† (=ks-x1001 . #x2126) ; ø»ˆš‘ (=cns11643-1 . #x212C) ; ø»‘‚§ (=big5 . #xA14B) ; ý¢€Š…‹ - (=ucs . #x2026) ; … )) (define-char '((name . "HYPHENATION POINT") (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2027) ; ‧ (=cns11643-1 . #x2131) ; ø»‘‚¬ (=big5 . #xA145) ; ý¢€Š…… - (=ucs . #x2027) ; ‧ )) (define-char '((name . "LINE SEPARATOR") @@ -417,11 +418,11 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ET") (mirrored . nil) + (=ucs . #x2030) ; ‰ (=gb2312 . #x216B) ; ø»„‡Ž (=jis-x0208-1983 . #x2273) ; ø»†’¸ (=ks-x1001 . #x2236) ; ø»ˆ›¿ (=jis-x0208-1990 . #x2273) ; ø½‰¸¬ - (=ucs . #x2030) ; ‰ )) (define-char '((name . "PER TEN THOUSAND SIGN") @@ -435,12 +436,12 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ET") (mirrored . nil) - (=gb2312 . #x2164) ; ø»„‡‡ + (=ucs . #x2032) ; ′ (=jis-x0208 . #x216C) ; ø½‰·‡ + (=gb2312 . #x2164) ; ø»„‡‡ (=ks-x1001 . #x2147) ; ø»ˆš² (=cns11643-1 . #x216B) ; ø»‘ƒ¦ (=big5 . #xA1AC) ; ý¢€Š†¬ - (=ucs . #x2032) ; ′ )) (define-char '((name . "DOUBLE PRIME") @@ -448,10 +449,10 @@ (bidi-category . "ET") (mirrored . nil) (->decomposition compat #x2032 #x2032) - (=gb2312 . #x2165) ; ø»„‡ˆ + (=ucs . #x2033) ; ″ (=jis-x0208 . #x216D) ; ø½‰·ˆ + (=gb2312 . #x2165) ; ø»„‡ˆ (=ks-x1001 . #x2148) ; ø»ˆš³ - (=ucs . #x2033) ; ″ )) (define-char '((name . "TRIPLE PRIME") @@ -466,9 +467,9 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) + (=ucs . #x2035) ; ‵ (=cns11643-1 . #x216A) ; ø»‘ƒ¥ (=big5 . #xA1AB) ; ý¢€Š†« - (=ucs . #x2035) ; ‵ )) (define-char '((name . "REVERSED DOUBLE PRIME") @@ -512,12 +513,12 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=gb2312 . #x2179) ; ø»„‡œ + (=ucs . #x203B) ; ※ (=jis-x0208 . #x2228) ; ø½‰·¡ + (=gb2312 . #x2179) ; ø»„‡œ (=ks-x1001 . #x2158) ; ø»ˆ›ƒ (=cns11643-1 . #x216F) ; ø»‘ƒª (=big5 . #xA1B0) ; ý¢€Š†° - (=ucs . #x203B) ; ※ )) (define-char '((name . "DOUBLE EXCLAMATION MARK") @@ -525,8 +526,8 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x0021 #x0021) - (=jis-x0213-1-2000 . #x286B) ; ø»¢ž˜ (=ucs . #x203C) ; ‼ + (=jis-x0213-1-2000 . #x286B) ; ø»¢ž˜ )) (define-char '((name . "INTERROBANG") @@ -543,14 +544,24 @@ (->decomposition compat #x0020 #x0305) (->fullwidth ((name . "FULLWIDTH OVERLINE") - (=gb2312 . #x237E) ; ø»„Š (=jis-x0208 . #x2131) ; ø½‰¶Œ + (=gb2312 . #x237E) ; ø»„Š (=ks-x1001 . #x237E) ; ø»ˆž¥ (=cns11643-1 . #x2223) ; ø»‘ƒ¼ )) + (=ucs . #x203E) ; ‾ (latin-jisx0201 . #x7E) ; øº‘Œ© (hebrew-iso8859-8 . #xAF) ; øº’¾¯ - (=ucs . #x203E) ; ‾ + )) +(define-char + '((name . "heavy overline") + (=>ucs . #x203E) ; ‾ + (general-category punctuation other) ; Informative Category + (bidi-category . "ON") + (mirrored . nil) + (=cns11643-1 . #x2224) ; ø»‘ƒ½ + (=big5 . #xA1C3) ; ý¢€Š‡ƒ + (=ucs@big5 . #xFFE3) ; ø»‘ƒ½ )) (define-char '((name . "FULLWIDTH OVERLINE") @@ -563,22 +574,12 @@ ((name . "OVERLINE") (=ucs . #x203E) ; ‾ )) - (=gb2312 . #x237E) ; ø»„Š (=jis-x0208 . #x2131) ; ø½‰¶Œ + (=gb2312 . #x237E) ; ø»„Š (=ks-x1001 . #x237E) ; ø»ˆž¥ (=cns11643-1 . #x2223) ; ø»‘ƒ¼ (=big5 . #xA1C2) ; ý¢€Š‡‚ - (=ucs@jis . #x203E) ; ø»„Š - )) -(define-char - '((name . "heavy overline") - (=>ucs . #x203E) ; ‾ - (general-category punctuation other) ; Informative Category - (bidi-category . "ON") - (mirrored . nil) - (=cns11643-1 . #x2224) ; ø»‘ƒ½ - (=big5 . #xA1C3) ; ý¢€Š‡ƒ - (=ucs@big5 . #xFFE3) ; ø»‘ƒ½ + (=ucs@jis . #x203E) ; ø½‰¶Œ )) (define-char '((name . "UNDERTIE") @@ -607,8 +608,8 @@ (general-category punctuation other) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=jis-x0213-1-2000 . #x2C7E) ; ø»¢¤£ (=ucs . #x2042) ; ⁂ + (=jis-x0213-1-2000 . #x2C7E) ; ø»¢¤£ )) (define-char '((name . "HYPHEN BULLET") @@ -622,8 +623,8 @@ (general-category symbol math) ; Informative Category (bidi-category . "ON") (mirrored . nil) - (=cns11643-1 . #x225F) ; ø»‘„¸ (=ucs . #x2044) ; ⁄ + (=cns11643-1 . #x225F) ; ø»‘„¸ )) (define-char '((name . "LEFT SQUARE BRACKET WITH QUILL") @@ -641,8 +642,8 @@ )) (define-char '((name . "DOUBLE QUESTION MARK") - (=jis-x0213-1-2000 . #x286C) ; ø»¢ž™ (=ucs . #x2047) ; ⁇ + (=jis-x0213-1-2000 . #x286C) ; ø»¢ž™ )) (define-char '((name . "QUESTION EXCLAMATION MARK") @@ -650,8 +651,8 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x003F #x0021) - (=jis-x0213-1-2000 . #x286D) ; ø»¢žš (=ucs . #x2048) ; ⁈ + (=jis-x0213-1-2000 . #x286D) ; ø»¢žš )) (define-char '((name . "EXCLAMATION QUESTION MARK") @@ -659,8 +660,8 @@ (bidi-category . "ON") (mirrored . nil) (->decomposition compat #x0021 #x003F) - (=jis-x0213-1-2000 . #x286E) ; ø»¢ž› (=ucs . #x2049) ; ⁉ + (=jis-x0213-1-2000 . #x286E) ; ø»¢ž› )) (define-char '((name . "TIRONIAN SIGN ET") @@ -692,8 +693,8 @@ )) (define-char '((name . "TWO ASTERISKS ALIGNED VERTICALLY") - (=jis-x0213-1-2000 . #x2C7D) ; ø»¢¤¢ (=ucs . #x2051) ; ⁑ + (=jis-x0213-1-2000 . #x2C7D) ; ø»¢¤¢ )) (define-char '((name . "INHIBIT SYMMETRIC SWAPPING")