From: tomo Date: Sun, 29 Jul 2001 08:39:01 +0000 (+0000) Subject: (presentation form for vertical book name mark): New character; relate X-Git-Tag: r21-2-38-utf-2000-0_17-1~176 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=65fde701b0e1c8ff4e7d11f095baf4636208d204;p=chise%2Fxemacs-chise.git.1 (presentation form for vertical book name mark): New character; relate to U+FE34; unify C1-213C and Big5-A15B. (book name mark): New character; relate to U+FE4F; unify C1-213D and Big5-A15C. - Merge Big5 code points. --- diff --git a/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el b/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el index 6f07af7..bed6cd6 100644 --- a/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el +++ b/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el @@ -1,249 +1,292 @@ (define-char '((name . "PRESENTATION FORM FOR VERTICAL TWO DOT LEADER") - (ucs . #xFE30) (general-category punctuation other) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x2025) (mirrored . nil) - (chinese-cns11643-1 #x21 #x2B) ; ø»‘‚¦ + (->decomposition vertical #x2025) + (chinese-cns11643-1 . #x212B) ; ø»‘‚¦ + (chinese-big5 . #xA14A) ; øºŸ›Š + (ucs . #xFE30) ; ︰ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL EM DASH") - (ucs . #xFE31) (general-category punctuation dash) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x2014) (mirrored . nil) - (chinese-cns11643-1 #x21 #x36) ; ø»‘‚± + (->decomposition vertical #x2014) + (chinese-cns11643-1 . #x2136) ; ø»‘‚± + (chinese-big5 . #xA157) ; øºŸ›— + (ucs . #xFE31) ; ︱ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL EN DASH") - (ucs . #xFE32) (general-category punctuation dash) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x2013) (mirrored . nil) - (chinese-cns11643-1 #x21 #x38) ; ø»‘‚³ + (->decomposition vertical #x2013) + (chinese-cns11643-1 . #x2138) ; ø»‘‚³ + (ucs . #xFE32) ; ︲ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LOW LINE") - (ucs . #xFE33) (general-category punctuation connector) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x005F) (mirrored . nil) + (->decomposition vertical #x005F) + (chinese-big5 . #xA159) ; øºŸ›™ + (ucs . #xFE33) ; ︳ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL WAVY LOW LINE") - (ucs . #xFE34) (general-category punctuation connector) ; Informative Category (bidi-category . "ON") + (mirrored . nil) (->decomposition vertical #x005F) + (ucs . #xFE34) ; ︴ + )) +(define-char + '((name . "presentation form for vertical book name mark") + (=>ucs . #xFE34) ; ︴ + (general-category punctuation connector) ; Informative Category + (bidi-category . "ON") (mirrored . nil) + (chinese-cns11643-1 . #x213C) ; ø»‘‚· + (chinese-big5 . #xA15B) ; øºŸ›› )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT PARENTHESIS") - (ucs . #xFE35) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x0028) (mirrored . nil) - (chinese-cns11643-1 #x21 #x40) ; ø»‘‚» + (->decomposition vertical #x0028) + (chinese-cns11643-1 . #x2140) ; ø»‘‚» + (chinese-big5 . #xA15F) ; øºŸ›Ÿ + (ucs . #xFE35) ; ︵ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT PARENTHESIS") - (ucs . #xFE36) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x0029) (mirrored . nil) - (chinese-cns11643-1 #x21 #x41) ; ø»‘‚¼ + (->decomposition vertical #x0029) + (chinese-cns11643-1 . #x2141) ; ø»‘‚¼ + (chinese-big5 . #xA160) ; øºŸ›  + (ucs . #xFE36) ; ︶ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT CURLY BRACKET") - (ucs . #xFE37) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x007B) (mirrored . nil) - (chinese-cns11643-1 #x21 #x44) ; ø»‘‚¿ + (->decomposition vertical #x007B) + (chinese-cns11643-1 . #x2144) ; ø»‘‚¿ + (chinese-big5 . #xA163) ; øºŸ›£ + (ucs . #xFE37) ; ︷ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT CURLY BRACKET") - (ucs . #xFE38) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x007D) (mirrored . nil) - (chinese-cns11643-1 #x21 #x45) ; ø»‘ƒ€ + (->decomposition vertical #x007D) + (chinese-cns11643-1 . #x2145) ; ø»‘ƒ€ + (chinese-big5 . #xA164) ; øºŸ›¤ + (ucs . #xFE38) ; ︸ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT TORTOISE SHELL BRACKET") - (ucs . #xFE39) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3014) (mirrored . nil) - (chinese-cns11643-1 #x21 #x48) ; ø»‘ƒƒ + (->decomposition vertical #x3014) + (chinese-cns11643-1 . #x2148) ; ø»‘ƒƒ + (chinese-big5 . #xA167) ; øºŸ›§ + (ucs . #xFE39) ; ︹ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT TORTOISE SHELL BRACKET") - (ucs . #xFE3A) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3015) (mirrored . nil) - (chinese-cns11643-1 #x21 #x49) ; ø»‘ƒ„ + (->decomposition vertical #x3015) + (chinese-cns11643-1 . #x2149) ; ø»‘ƒ„ + (chinese-big5 . #xA168) ; øºŸ›¨ + (ucs . #xFE3A) ; ︺ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT BLACK LENTICULAR BRACKET") - (ucs . #xFE3B) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3010) (mirrored . nil) - (chinese-cns11643-1 #x21 #x4C) ; ø»‘ƒ‡ + (->decomposition vertical #x3010) + (chinese-cns11643-1 . #x214C) ; ø»‘ƒ‡ + (chinese-big5 . #xA16B) ; øºŸ›« + (ucs . #xFE3B) ; ︻ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT BLACK LENTICULAR BRACKET") - (ucs . #xFE3C) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3011) (mirrored . nil) - (chinese-cns11643-1 #x21 #x4D) ; ø»‘ƒˆ + (->decomposition vertical #x3011) + (chinese-cns11643-1 . #x214D) ; ø»‘ƒˆ + (chinese-big5 . #xA16C) ; øºŸ›¬ + (ucs . #xFE3C) ; ︼ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT DOUBLE ANGLE BRACKET") - (ucs . #xFE3D) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300A) (mirrored . nil) - (chinese-cns11643-1 #x21 #x50) ; ø»‘ƒ‹ + (->decomposition vertical #x300A) + (chinese-cns11643-1 . #x2150) ; ø»‘ƒ‹ + (chinese-big5 . #xA16F) ; øºŸ›¯ + (ucs . #xFE3D) ; ︽ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT DOUBLE ANGLE BRACKET") - (ucs . #xFE3E) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300B) (mirrored . nil) - (chinese-cns11643-1 #x21 #x51) ; ø»‘ƒŒ + (->decomposition vertical #x300B) + (chinese-cns11643-1 . #x2151) ; ø»‘ƒŒ + (chinese-big5 . #xA170) ; øºŸ›° + (ucs . #xFE3E) ; ︾ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT ANGLE BRACKET") - (ucs . #xFE3F) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3008) (mirrored . nil) - (chinese-cns11643-1 #x21 #x54) ; ø»‘ƒ + (->decomposition vertical #x3008) + (chinese-cns11643-1 . #x2154) ; ø»‘ƒ + (chinese-big5 . #xA173) ; øºŸ›³ + (ucs . #xFE3F) ; ︿ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT ANGLE BRACKET") - (ucs . #xFE40) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x3009) (mirrored . nil) - (chinese-cns11643-1 #x21 #x55) ; ø»‘ƒ + (->decomposition vertical #x3009) + (chinese-cns11643-1 . #x2155) ; ø»‘ƒ + (chinese-big5 . #xA174) ; øºŸ›´ + (ucs . #xFE40) ; ﹀ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT CORNER BRACKET") - (ucs . #xFE41) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300C) (mirrored . nil) - (chinese-cns11643-1 #x21 #x58) ; ø»‘ƒ“ + (->decomposition vertical #x300C) + (chinese-cns11643-1 . #x2158) ; ø»‘ƒ“ + (chinese-big5 . #xA177) ; øºŸ›· + (ucs . #xFE41) ; ﹁ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT CORNER BRACKET") - (ucs . #xFE42) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300D) (mirrored . nil) - (chinese-cns11643-1 #x21 #x59) ; ø»‘ƒ” + (->decomposition vertical #x300D) + (chinese-cns11643-1 . #x2159) ; ø»‘ƒ” + (chinese-big5 . #xA178) ; øºŸ›¸ + (ucs . #xFE42) ; ﹂ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL LEFT WHITE CORNER BRACKET") - (ucs . #xFE43) (general-category punctuation open) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300E) (mirrored . nil) - (chinese-cns11643-1 #x21 #x5C) ; ø»‘ƒ— + (->decomposition vertical #x300E) + (chinese-cns11643-1 . #x215C) ; ø»‘ƒ— + (chinese-big5 . #xA17B) ; øºŸ›» + (ucs . #xFE43) ; ﹃ )) (define-char '((name . "PRESENTATION FORM FOR VERTICAL RIGHT WHITE CORNER BRACKET") - (ucs . #xFE44) (general-category punctuation close) ; Informative Category (bidi-category . "ON") - (->decomposition vertical #x300F) (mirrored . nil) - (chinese-cns11643-1 #x21 #x5D) ; ø»‘ƒ˜ + (->decomposition vertical #x300F) + (chinese-cns11643-1 . #x215D) ; ø»‘ƒ˜ + (chinese-big5 . #xA17C) ; øºŸ›¼ + (ucs . #xFE44) ; ﹄ )) (define-char '((name . "DASHED OVERLINE") - (ucs . #xFE49) (general-category punctuation other) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x203E) (mirrored . nil) - (chinese-cns11643-1 #x22 #x27) ; ø»‘„€ + (->decomposition compat #x203E) + (chinese-cns11643-1 . #x2227) ; ø»‘„€ + (chinese-big5 . #xA1C6) ; øºŸœ¤ + (ucs . #xFE49) ; ﹉ )) (define-char '((name . "CENTRELINE OVERLINE") - (ucs . #xFE4A) (general-category punctuation other) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x203E) (mirrored . nil) - (chinese-cns11643-1 #x22 #x28) ; ø»‘„ + (->decomposition compat #x203E) + (chinese-cns11643-1 . #x2228) ; ø»‘„ + (chinese-big5 . #xA1C7) ; øºŸœ¥ + (ucs . #xFE4A) ; ﹊ )) (define-char '((name . "WAVY OVERLINE") - (ucs . #xFE4B) (general-category punctuation other) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x203E) (mirrored . nil) - (chinese-cns11643-1 #x22 #x2B) ; ø»‘„„ + (->decomposition compat #x203E) + (chinese-cns11643-1 . #x222B) ; ø»‘„„ + (chinese-big5 . #xA1CA) ; øºŸœ¨ + (ucs . #xFE4B) ; ﹋ )) (define-char '((name . "DOUBLE WAVY OVERLINE") - (ucs . #xFE4C) (general-category punctuation other) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x203E) (mirrored . nil) - (chinese-cns11643-1 #x22 #x2C) ; ø»‘„… + (->decomposition compat #x203E) + (chinese-cns11643-1 . #x222C) ; ø»‘„… + (chinese-big5 . #xA1CB) ; øºŸœ© + (ucs . #xFE4C) ; ﹌ )) (define-char '((name . "DASHED LOW LINE") - (ucs . #xFE4D) (general-category punctuation connector) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x005F) (mirrored . nil) - (chinese-cns11643-1 #x22 #x29) ; ø»‘„‚ + (->decomposition compat #x005F) + (chinese-cns11643-1 . #x2229) ; ø»‘„‚ + (chinese-big5 . #xA1C8) ; øºŸœ¦ + (ucs . #xFE4D) ; ﹍ )) (define-char '((name . "CENTRELINE LOW LINE") - (ucs . #xFE4E) (general-category punctuation connector) ; Informative Category (bidi-category . "ON") - (->decomposition compat #x005F) (mirrored . nil) - (chinese-cns11643-1 #x22 #x2A) ; ø»‘„ƒ + (->decomposition compat #x005F) + (chinese-cns11643-1 . #x222A) ; ø»‘„ƒ + (chinese-big5 . #xA1C9) ; øºŸœ§ + (ucs . #xFE4E) ; ﹎ )) (define-char '((name . "WAVY LOW LINE") - (ucs . #xFE4F) (general-category punctuation connector) ; Informative Category (bidi-category . "ON") + (mirrored . nil) (->decomposition compat #x005F) + (ucs . #xFE4F) ; ﹏ + )) +(define-char + '((name . "book name mark") + (=>ucs . #xFE4F) ; ﹏ + (general-category punctuation connector) ; Informative Category + (bidi-category . "ON") (mirrored . nil) + (chinese-cns11643-1 . #x213D) ; ø»‘‚¸ + (chinese-big5 . #xA15C) ; øºŸ›œ ))