# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1075955365 0
# Node ID fdc51e185411305e6bf5d0ab8bb55b77a5aac2d6
# Parent  7ddfd4fccd6b803887026860a79879dd12441a57
(japanese-jisx0213.2004-1): Specify :code-space.
(cp932-2-byte): Fix :code-space.
(unicode-smp, unicode-sip, unicode-ssp): New charsets.

diff -r 7ddfd4fccd6b -r fdc51e185411 lisp/international/mule-conf.el
--- a/lisp/international/mule-conf.el	Wed Feb 04 13:03:50 2004 +0000
+++ b/lisp/international/mule-conf.el	Thu Feb 05 04:29:25 2004 +0000
@@ -431,6 +431,7 @@
   "JISX0213.2004 Plane1 (Japanese)"
   :short-name "JISX0213.2004-1"
   :dimension 2
+  :code-space [33 126 33 126]
   :iso-final-char ?Q
   :superset '(japanese-jisx0213-a japanese-jisx0213-1))
 
@@ -445,7 +446,7 @@
   "2-byte part of CP932"
   :dimension 2
   :map "CP932-2BYTE"
-  :code-space [#x00 #xFF #x00 #xFE]
+  :code-space [#x40 #xFC #x81 #xEF]
   :supplementary-p t)
 
 (define-charset 'cp932
@@ -959,11 +960,29 @@
   :code-offset #x100)
 
 (define-charset 'unicode-bmp
-  "Unicode Basic Multilingual Plane"
+  "Unicode Basic Multilingual Plane (U+0000..U+FFFF)"
   :short-name "Unicode BMP"
   :code-space [0 255 0 255]
   :code-offset 0)
 
+(define-charset 'unicode-smp
+  "Unicode Supplementary Multilingual Plane (U+10000..U+1FFFF)"
+  :short-name "Unicode SMP "
+  :code-space [0 255 0 255]
+  :code-offset #x10000)
+
+(define-charset 'unicode-sip
+  "Unicode Supplementary Ideographic Plane (U+20000..U+2FFFF)"
+  :short-name "Unicode SIP"
+  :code-space [0 255 0 255]
+  :code-offset #x20000)
+
+(define-charset 'unicode-ssp
+  "Unicode Supplementary Special-purpose Plane (U+E0000..U+EFFFF)"
+  :short-name "Unicode SSP"
+  :code-space [0 255 0 255]
+  :code-offset #xE0000)
+
 (define-charset 'ethiopic
   "Ethiopic characters for Amharic and Tigrigna."
   :short-name "Ethiopic"