projects / chise / xemacs-chise.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 9a97e55)
Reformatted.
authortomo <tomo>
Thu, 26 Jul 2001 17:18:15 +0000 (17:18 +0000)
committertomo <tomo>
Thu, 26 Jul 2001 17:18:15 +0000 (17:18 +0000)
lisp/utf-2000/u02400-Control-Pictures.el patch | blob | history
lisp/utf-2000/u02440-OCR.el patch | blob | history

diff --git a/lisp/utf-2000/u02400-Control-Pictures.el b/lisp/utf-2000/u02400-Control-Pictures.el
index bd0a40c..f813892 100644 (file)
--- a/lisp/utf-2000/u02400-Control-Pictures.el
+++ b/lisp/utf-2000/u02400-Control-Pictures.el
@@ -1,307 +1,307 @@
 (define-char
   '((name              . "SYMBOL FOR NULL")
-    (ucs               . #x2400)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x21)     ; 
+    (chinese-cns11643-1 . #x4221)      ; 
+    (ucs               . #x2400)       ; ␀
     ))
 (define-char
   '((name              . "SYMBOL FOR START OF HEADING")
-    (ucs               . #x2401)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x22)     ; 
+    (chinese-cns11643-1 . #x4222)      ; 
+    (ucs               . #x2401)       ; ␁
     ))
 (define-char
   '((name              . "SYMBOL FOR START OF TEXT")
-    (ucs               . #x2402)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x23)     ; 
+    (chinese-cns11643-1 . #x4223)      ; 
+    (ucs               . #x2402)       ; ␂
     ))
 (define-char
   '((name              . "SYMBOL FOR END OF TEXT")
-    (ucs               . #x2403)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x24)     ; 
+    (chinese-cns11643-1 . #x4224)      ; 
+    (ucs               . #x2403)       ; ␃
     ))
 (define-char
   '((name              . "SYMBOL FOR END OF TRANSMISSION")
-    (ucs               . #x2404)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x25)     ; 
+    (chinese-cns11643-1 . #x4225)      ; 
+    (ucs               . #x2404)       ; ␄
     ))
 (define-char
   '((name              . "SYMBOL FOR ENQUIRY")
-    (ucs               . #x2405)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x26)     ; 
+    (chinese-cns11643-1 . #x4226)      ; 
+    (ucs               . #x2405)       ; ␅
     ))
 (define-char
   '((name              . "SYMBOL FOR ACKNOWLEDGE")
-    (ucs               . #x2406)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x27)     ; 
+    (chinese-cns11643-1 . #x4227)      ; 
+    (ucs               . #x2406)       ; ␆
     ))
 (define-char
   '((name              . "SYMBOL FOR BELL")
-    (ucs               . #x2407)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x28)     ; 
+    (chinese-cns11643-1 . #x4228)      ; 
+    (ucs               . #x2407)       ; ␇
     ))
 (define-char
   '((name              . "SYMBOL FOR BACKSPACE")
-    (ucs               . #x2408)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x29)     ; 
+    (chinese-cns11643-1 . #x4229)      ; 
+    (ucs               . #x2408)       ; ␈
     ))
 (define-char
   '((name              . "SYMBOL FOR HORIZONTAL TABULATION")
-    (ucs               . #x2409)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2A)     ; 
+    (chinese-cns11643-1 . #x422A)      ; 
+    (ucs               . #x2409)       ; ␉
     ))
 (define-char
   '((name              . "SYMBOL FOR LINE FEED")
-    (ucs               . #x240A)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2B)     ; 
+    (chinese-cns11643-1 . #x422B)      ; 
+    (ucs               . #x240A)       ; ␊
     ))
 (define-char
   '((name              . "SYMBOL FOR VERTICAL TABULATION")
-    (ucs               . #x240B)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2C)     ; 
+    (chinese-cns11643-1 . #x422C)      ; 
+    (ucs               . #x240B)       ; ␋
     ))
 (define-char
   '((name              . "SYMBOL FOR FORM FEED")
-    (ucs               . #x240C)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2D)     ; 
+    (chinese-cns11643-1 . #x422D)      ; 
+    (ucs               . #x240C)       ; ␌
     ))
 (define-char
   '((name              . "SYMBOL FOR CARRIAGE RETURN")
-    (ucs               . #x240D)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2E)     ; 
+    (chinese-cns11643-1 . #x422E)      ; 
+    (ucs               . #x240D)       ; ␍
     ))
 (define-char
   '((name              . "SYMBOL FOR SHIFT OUT")
-    (ucs               . #x240E)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x2F)     ; 
+    (chinese-cns11643-1 . #x422F)      ; 
+    (ucs               . #x240E)       ; ␎
     ))
 (define-char
   '((name              . "SYMBOL FOR SHIFT IN")
-    (ucs               . #x240F)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x30)     ; 
+    (chinese-cns11643-1 . #x4230)      ; 
+    (ucs               . #x240F)       ; ␏
     ))
 (define-char
   '((name              . "SYMBOL FOR DATA LINK ESCAPE")
-    (ucs               . #x2410)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x31)     ; 
+    (chinese-cns11643-1 . #x4231)      ; 
+    (ucs               . #x2410)       ; ␐
     ))
 (define-char
   '((name              . "SYMBOL FOR DEVICE CONTROL ONE")
-    (ucs               . #x2411)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x32)     ; 
+    (chinese-cns11643-1 . #x4232)      ; 
+    (ucs               . #x2411)       ; ␑
     ))
 (define-char
   '((name              . "SYMBOL FOR DEVICE CONTROL TWO")
-    (ucs               . #x2412)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x33)     ; 
+    (chinese-cns11643-1 . #x4233)      ; 
+    (ucs               . #x2412)       ; ␒
     ))
 (define-char
   '((name              . "SYMBOL FOR DEVICE CONTROL THREE")
-    (ucs               . #x2413)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x34)     ; 
+    (chinese-cns11643-1 . #x4234)      ; 
+    (ucs               . #x2413)       ; ␓
     ))
 (define-char
   '((name              . "SYMBOL FOR DEVICE CONTROL FOUR")
-    (ucs               . #x2414)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x35)     ; 
+    (chinese-cns11643-1 . #x4235)      ; 
+    (ucs               . #x2414)       ; ␔
     ))
 (define-char
   '((name              . "SYMBOL FOR NEGATIVE ACKNOWLEDGE")
-    (ucs               . #x2415)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x36)     ; 
+    (chinese-cns11643-1 . #x4236)      ; 
+    (ucs               . #x2415)       ; ␕
     ))
 (define-char
   '((name              . "SYMBOL FOR SYNCHRONOUS IDLE")
-    (ucs               . #x2416)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x37)     ; 
+    (chinese-cns11643-1 . #x4237)      ; 
+    (ucs               . #x2416)       ; ␖
     ))
 (define-char
   '((name              . "SYMBOL FOR END OF TRANSMISSION BLOCK")
-    (ucs               . #x2417)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x38)     ; 
+    (chinese-cns11643-1 . #x4238)      ; 
+    (ucs               . #x2417)       ; ␗
     ))
 (define-char
   '((name              . "SYMBOL FOR CANCEL")
-    (ucs               . #x2418)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x39)     ; 
+    (chinese-cns11643-1 . #x4239)      ; 
+    (ucs               . #x2418)       ; ␘
     ))
 (define-char
   '((name              . "SYMBOL FOR END OF MEDIUM")
-    (ucs               . #x2419)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3A)     ; 
+    (chinese-cns11643-1 . #x423A)      ; 
+    (ucs               . #x2419)       ; ␙
     ))
 (define-char
   '((name              . "SYMBOL FOR SUBSTITUTE")
-    (ucs               . #x241A)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3B)     ; 
+    (chinese-cns11643-1 . #x423B)      ; 
+    (ucs               . #x241A)       ; ␚
     ))
 (define-char
   '((name              . "SYMBOL FOR ESCAPE")
-    (ucs               . #x241B)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3C)     ; 
+    (chinese-cns11643-1 . #x423C)      ; 
+    (ucs               . #x241B)       ; ␛
     ))
 (define-char
   '((name              . "SYMBOL FOR FILE SEPARATOR")
-    (ucs               . #x241C)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3D)     ; 
+    (chinese-cns11643-1 . #x423D)      ; 
+    (ucs               . #x241C)       ; ␜
     ))
 (define-char
   '((name              . "SYMBOL FOR GROUP SEPARATOR")
-    (ucs               . #x241D)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3E)     ; 
+    (chinese-cns11643-1 . #x423E)      ; 
+    (ucs               . #x241D)       ; ␝
     ))
 (define-char
   '((name              . "SYMBOL FOR RECORD SEPARATOR")
-    (ucs               . #x241E)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x3F)     ; 
+    (chinese-cns11643-1 . #x423F)      ; 
+    (ucs               . #x241E)       ; ␞
     ))
 (define-char
   '((name              . "SYMBOL FOR UNIT SEPARATOR")
-    (ucs               . #x241F)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x40)     ; 
+    (chinese-cns11643-1 . #x4240)      ; 
+    (ucs               . #x241F)       ; ␟
     ))
 (define-char
   '((name              . "SYMBOL FOR SPACE")
-    (ucs               . #x2420)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2420)       ; ␠
     ))
 (define-char
   '((name              . "SYMBOL FOR DELETE")
-    (ucs               . #x2421)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x42 #x41)     ; 
+    (chinese-cns11643-1 . #x4241)      ; 
+    (ucs               . #x2421)       ; ␡
     ))
 (define-char
   '((name              . "BLANK SYMBOL")
-    (ucs               . #x2422)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2422)       ; ␢
     ))
 (define-char
   '((name              . "OPEN BOX")
-    (ucs               . #x2423)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0213-1       #x27 #x7D)      ; ␣
+    (japanese-jisx0213-1       . #x277D)       ; 
+    (ucs                       . #x2423)       ; ␣
     ))
 (define-char
   '((name              . "SYMBOL FOR NEWLINE")
-    (ucs               . #x2424)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2424)       ; ␤
     ))
 (define-char
   '((name              . "SYMBOL FOR DELETE FORM TWO")
-    (ucs               . #x2425)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2425)       ; ␥
     ))
 (define-char
   '((name              . "SYMBOL FOR SUBSTITUTE FORM TWO")
-    (ucs               . #x2426)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2426)       ; ␦
     ))
diff --git a/lisp/utf-2000/u02440-OCR.el b/lisp/utf-2000/u02440-OCR.el
index d41efad..e71a23f 100644 (file)
--- a/lisp/utf-2000/u02440-OCR.el
+++ b/lisp/utf-2000/u02440-OCR.el
@@ -1,77 +1,77 @@
 (define-char
   '((name              . "OCR HOOK")
-    (ucs               . #x2440)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2440)       ; ⑀
     ))
 (define-char
   '((name              . "OCR CHAIR")
-    (ucs               . #x2441)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2441)       ; ⑁
     ))
 (define-char
   '((name              . "OCR FORK")
-    (ucs               . #x2442)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2442)       ; ⑂
     ))
 (define-char
   '((name              . "OCR INVERTED FORK")
-    (ucs               . #x2443)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2443)       ; ⑃
     ))
 (define-char
   '((name              . "OCR BELT BUCKLE")
-    (ucs               . #x2444)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2444)       ; ⑄
     ))
 (define-char
   '((name              . "OCR BOW TIE")
-    (ucs               . #x2445)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2445)       ; ⑅
     ))
 (define-char
   '((name              . "OCR BRANCH BANK IDENTIFICATION")
-    (ucs               . #x2446)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2446)       ; ⑆
     ))
 (define-char
   '((name              . "OCR AMOUNT OF CHECK")
-    (ucs               . #x2447)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2447)       ; ⑇
     ))
 (define-char
   '((name              . "OCR DASH")
-    (ucs               . #x2448)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2448)       ; ⑈
     ))
 (define-char
   '((name              . "OCR CUSTOMER ACCOUNT NUMBER")
-    (ucs               . #x2449)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x2449)       ; ⑉
     ))
 (define-char
   '((name              . "OCR DOUBLE BACKSLASH")
-    (ucs               . #x244A)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (ucs               . #x244A)       ; ⑊
     ))