Sync with r21-4-10-utf-2000-0_19-5.
authortomo <tomo>
Tue, 24 Dec 2002 20:02:36 +0000 (20:02 +0000)
committertomo <tomo>
Tue, 24 Dec 2002 20:02:36 +0000 (20:02 +0000)
lisp/utf-2000/Ideograph-R034-Go.el
lisp/utf-2000/Ideograph-R061-Heart.el
lisp/utf-2000/char-db-util.el

index 8d4de51..a7e7219 100644 (file)
@@ -1,6 +1,6 @@
 (define-char
   '((=>ucs             . #x5902)       ; 夂
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 0)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 3)
@@ -12,7 +12,7 @@
     ))
 (define-char
   '((morohashi-daikanwa        5691 0 1)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 0)
     (total-strokes      . 3)
     (chinese-gb2312    . #x623A)       ; 
@@ -21,7 +21,7 @@
     ))
 (define-char
   '((=>ucs             . #x21552)      ; 𡕒
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 0)
     (total-strokes      . 3)
     (chinese-cns11643-5 . #x212F)      ; 
@@ -29,7 +29,7 @@
     ))
 (define-char
   '((morohashi-daikanwa        5692 0 2)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 0)
     (total-strokes      . 3)
     (hanyu-dazidian-vol         . 1)
@@ -40,7 +40,7 @@
     ))
 (define-char
   '((=>ucs             . #x5903)       ; 夃
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 1)
     (total-strokes      . 4)
     (chinese-cns11643-2 . #x213A)      ; 
@@ -49,7 +49,7 @@
     ))
 (define-char
   '((morohashi-daikanwa        5693 0 5)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 1)
     (total-strokes      . 4)
     (ideographic-structure
@@ -63,7 +63,7 @@
     (ucs               . #x5903)       ; 夃
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 2)
     (total-strokes      . 5)
     (chinese-cns11643-6 . #x2263)      ; 
@@ -71,7 +71,7 @@
     (ucs               . #x21553)      ; 𡕓
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 2)
     (total-strokes      . 5)
     (ideographic-structure
@@ -90,7 +90,7 @@
     ))
 (define-char
   '((=>ucs             . #x5904)       ; 处
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 2)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 5)
     (mojikyo           . 075966)       ; 
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 3)
     (total-strokes      . 6)
     (ideographic-structure
 (define-char
   '((=>ucs             . #x5905)       ; 夅
     (morohashi-daikanwa        5695 0 0)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 3)
     (total-strokes      . 6)
     (chinese-cns11643-3 . #x2344)      ; 
 (define-char
   '((=>ucs             . #x5905)       ; 夅
     (morohashi-daikanwa        5695 0 1)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 3)
     (total-strokes      . 6)
     (ideograph-cbeta   . 03232)        ; 
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 3)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 6)
     (ucs               . #x21555)      ; 𡕕
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 3)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 6)
     (ucs               . #x21556)      ; 𡕖
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 4)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 7)
     (ucs                       . #x5906)       ; 夆
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 4)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 7)
     (ideograph-daikanwa . 05699)       ; 
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 4)
     (total-strokes      . 7)
     (chinese-cns11643-6 . #x266C)      ; 
     (ucs               . #x21558)      ; 𡕘
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 5)
     (total-strokes      . 8)
     (ideographic-structure
     (ucs               . #x5907)       ; 备
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 9)
     (ucs               . #x3685)       ; 㚅
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (ideographic-structure
 (define-char
   '((=>ucs             . #x5908)       ; 夈
     (morohashi-daikanwa        5702 0 1)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 9)
     ))
 (define-char
   '((=>ucs             . #x5909)       ; 変
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (ideographic-structure
 (define-char
   '((=>ucs             . #x5909)       ; 変
     (morohashi-daikanwa        5703 0 0)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (kangxi-radical     . 35)  ; ⼢
     (total-strokes      . 9)
     ))
 (define-char
   '((morohashi-daikanwa        5703 0 1)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (ideographic-structure
     (ucs               . #x5909)       ; 変
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 7)
     (total-strokes      . 10)
     (chinese-cns11643-6 . #x3643)      ; 
     ))
 (define-char
   '((=>ucs             . #x2155B)      ; 𡕛
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 8)
     (total-strokes      . 11)
     (chinese-cns11643-6 . #x3E37)      ; 
     ))
 (define-char
   '((morohashi-daikanwa        5705 0 0)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 8)
     (total-strokes      . 11)
     (ucs               . #x2155B)      ; 𡕛
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 8)
     (cns-radical        . 35)  ; ⼢
     (total-strokes      . 11)
     (ucs               . #x2155C)      ; 𡕜
     ))
 (define-char
-  '((ideographic-radical . 34) ; 夂
+  '((ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 10)
     (total-strokes      . 13)
     (ideograph-daikanwa . 05707)       ; 
 (define-char
   '((=>ucs             . #x2155D)      ; 𡕝
     (morohashi-daikanwa        5707 0 1)
-    (ideographic-radical . 34) ; 夂
+    (ideographic-radical . 34) ; ⼡
     (ideographic-strokes . 10)
     (total-strokes      . 13)
     (chinese-cns11643-6 . #x515A)      ; 
index bb900ad..c4e38e7 100644 (file)
 (define-char
   '((ideographic-radical . 61) ; ⼼
     (ideographic-strokes . 8)
-    (kangxi-radical     . 34)  ; 夂
-    (kangxi-strokes     . 9)
     (total-strokes      . 12)
     (chinese-gb2312    . #x3139)       ; 
     (chinese-isoir165  . #x3139)       ; 
index fd69226..480167b 100644 (file)
   (let ((v (make-vector 215 nil))
        (i 1))
     (while (< i 215)
-      (aset v i (int-char (+ #x2EFF i)))
+      (aset v i (decode-char 'ucs (+ #x2EFF i)))
       (setq i (1+ i)))
-    (unless (charset-iso-final-char (car (split-char (aref v 34))))
-      (aset v 34 (make-char 'chinese-gb2312 #x62 #x3A)))
     v))
 
 (defvar char-db-ignored-attributes nil)