X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu00000-C0.el;h=e0abd3352c74fd24f58ad2d1293683e7fc9754e0;hb=7a33575176f7e0b9ca40c60815621792b45f31c9;hp=f51d2bf7383cfa0014cfd340d4a7ca67ffc1353b;hpb=713c1775c3350729ae7a9bb864015ed7136cd2d5;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u00000-C0.el b/lisp/utf-2000/u00000-C0.el
index f51d2bf..e0abd33 100644
--- a/lisp/utf-2000/u00000-C0.el
+++ b/lisp/utf-2000/u00000-C0.el
@@ -1,240 +1,240 @@
 (define-char
   '((name		. "NULL")
-    (ucs		. #x0000)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x00)
+    (ascii		. #x00)	; ␀
+    (ucs		. #x0000)	; ␀
     ))
 (define-char
   '((name		. "START OF HEADING")
-    (ucs		. #x0001)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x01)
+    (ascii		. #x01)	; ␁
+    (ucs		. #x0001)	; ␁
     ))
 (define-char
   '((name		. "START OF TEXT")
-    (ucs		. #x0002)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x02)
+    (ascii		. #x02)	; ␂
+    (ucs		. #x0002)	; ␂
     ))
 (define-char
   '((name		. "END OF TEXT")
-    (ucs		. #x0003)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x03)
+    (ascii		. #x03)	; ␃
+    (ucs		. #x0003)	; ␃
     ))
 (define-char
   '((name		. "END OF TRANSMISSION")
-    (ucs		. #x0004)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x04)
+    (ascii		. #x04)	; ␄
+    (ucs		. #x0004)	; ␄
     ))
 (define-char
   '((name		. "ENQUIRY")
-    (ucs		. #x0005)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x05)
+    (ascii		. #x05)	; ␅
+    (ucs		. #x0005)	; ␅
     ))
 (define-char
   '((name		. "ACKNOWLEDGE")
-    (ucs		. #x0006)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x06)
+    (ascii		. #x06)	; ␆
+    (ucs		. #x0006)	; ␆
     ))
 (define-char
   '((name		. "BELL")
-    (ucs		. #x0007)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x07)
+    (ascii		. #x07)	; ␇
+    (ucs		. #x0007)	; ␇
     ))
 (define-char
   '((name		. "BACKSPACE")
-    (ucs		. #x0008)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x08)
+    (ascii		. #x08)	; ␈
+    (ucs		. #x0008)	; ␈
     ))
 (define-char
   '((name		. "HORIZONTAL TABULATION")
-    (ucs		. #x0009)
     (general-category	other control) ; Normative Category
     (bidi-category	. "S")
     (mirrored		. nil)
-    (ascii		#x09)
+    (ascii		. #x09)	; ␉
+    (ucs		. #x0009)	; ␉
     ))
 (define-char
   '((name		. "LINE FEED")
-    (ucs		. #x000A)
     (general-category	other control) ; Normative Category
     (bidi-category	. "B")
     (mirrored		. nil)
-    (ascii		#x0A)
+    (ascii		. #x0A)	; ␊
+    (ucs		. #x000A)	; ␊
     ))
 (define-char
   '((name		. "VERTICAL TABULATION")
-    (ucs		. #x000B)
     (general-category	other control) ; Normative Category
     (bidi-category	. "S")
     (mirrored		. nil)
-    (ascii		#x0B)
+    (ascii		. #x0B)	; ␋
+    (ucs		. #x000B)	; ␋
     ))
 (define-char
   '((name		. "FORM FEED")
-    (ucs		. #x000C)
     (general-category	other control) ; Normative Category
     (bidi-category	. "WS")
     (mirrored		. nil)
-    (ascii		#x0C)
+    (ascii		. #x0C)	; ␌
+    (ucs		. #x000C)	; ␌
     ))
 (define-char
   '((name		. "CARRIAGE RETURN")
-    (ucs		. #x000D)
     (general-category	other control) ; Normative Category
     (bidi-category	. "B")
     (mirrored		. nil)
-    (ascii		#x0D)
+    (ascii		. #x0D)	; ␍
+    (ucs		. #x000D)	; ␍
     ))
 (define-char
   '((name		. "SHIFT OUT")
-    (ucs		. #x000E)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x0E)
+    (ascii		. #x0E)	; ␎
+    (ucs		. #x000E)	; ␎
     ))
 (define-char
   '((name		. "SHIFT IN")
-    (ucs		. #x000F)
     (general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x0F)
+    (ascii		. #x0F)	; ␏
+    (ucs		. #x000F)	; ␏
     ))
 (define-char
-  '((ucs		. #x0010)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x10)
+    (ascii		. #x10)	; ␐
+    (ucs		. #x0010)	; ␐
     ))
 (define-char
-  '((ucs		. #x0011)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x11)
+    (ascii		. #x11)	; ␑
+    (ucs		. #x0011)	; ␑
     ))
 (define-char
-  '((ucs		. #x0012)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x12)
+    (ascii		. #x12)	; ␒
+    (ucs		. #x0012)	; ␒
     ))
 (define-char
-  '((ucs		. #x0013)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x13)
+    (ascii		. #x13)	; ␓
+    (ucs		. #x0013)	; ␓
     ))
 (define-char
-  '((ucs		. #x0014)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x14)
+    (ascii		. #x14)	; ␔
+    (ucs		. #x0014)	; ␔
     ))
 (define-char
-  '((ucs		. #x0015)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x15)
+    (ascii		. #x15)	; ␕
+    (ucs		. #x0015)	; ␕
     ))
 (define-char
-  '((ucs		. #x0016)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x16)
+    (ascii		. #x16)	; ␖
+    (ucs		. #x0016)	; ␖
     ))
 (define-char
-  '((ucs		. #x0017)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x17)
+    (ascii		. #x17)	; ␗
+    (ucs		. #x0017)	; ␗
     ))
 (define-char
-  '((ucs		. #x0018)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x18)
+    (ascii		. #x18)	; ␘
+    (ucs		. #x0018)	; ␘
     ))
 (define-char
-  '((ucs		. #x0019)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x19)
+    (ascii		. #x19)	; ␙
+    (ucs		. #x0019)	; ␙
     ))
 (define-char
-  '((ucs		. #x001A)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x1A)
+    (ascii		. #x1A)	; ␚
+    (ucs		. #x001A)	; ␚
     ))
 (define-char
-  '((ucs		. #x001B)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "BN")
     (mirrored		. nil)
-    (ascii		#x1B)
+    (ascii		. #x1B)	; ␛
+    (ucs		. #x001B)	; ␛
     ))
 (define-char
-  '((ucs		. #x001C)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "B")
     (mirrored		. nil)
-    (ascii		#x1C)
+    (ascii		. #x1C)	; ␜
+    (ucs		. #x001C)	; ␜
     ))
 (define-char
-  '((ucs		. #x001D)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "B")
     (mirrored		. nil)
-    (ascii		#x1D)
+    (ascii		. #x1D)	; ␝
+    (ucs		. #x001D)	; ␝
     ))
 (define-char
-  '((ucs		. #x001E)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "B")
     (mirrored		. nil)
-    (ascii		#x1E)
+    (ascii		. #x1E)	; ␞
+    (ucs		. #x001E)	; ␞
     ))
 (define-char
-  '((ucs		. #x001F)
-    (general-category	other control) ; Normative Category
+  '((general-category	other control) ; Normative Category
     (bidi-category	. "S")
     (mirrored		. nil)
-    (ascii		#x1F)
+    (ascii		. #x1F)	; ␟
+    (ucs		. #x001F)	; ␟
     ))