projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Sync up with r21-4-11-chise-0_20-=ucs-big5.
[chise/xemacs-chise.git-]
/
src
/
mule-charset.c
diff --git
a/src/mule-charset.c
b/src/mule-charset.c
index
63a9414
..
9399ee4
100644
(file)
--- a/
src/mule-charset.c
+++ b/
src/mule-charset.c
@@
-176,7
+176,7
@@
Lisp_Object
put_char_ccs_code_point (Lisp_Object character,
Lisp_Object ccs, Lisp_Object value)
{
put_char_ccs_code_point (Lisp_Object character,
Lisp_Object ccs, Lisp_Object value)
{
- if (!EQ (XCHARSET_NAME (ccs), Qucs)
+ if (!EQ (XCHARSET_NAME (ccs), Qmap_ucs)
|| !INTP (value)
|| (XCHAR (character) != XINT (value)))
{
|| !INTP (value)
|| (XCHAR (character) != XINT (value)))
{
@@
-302,7
+302,7
@@
Lisp_Object Qascii,
Qchinese_cns11643_1,
Qchinese_cns11643_2,
#ifdef UTF2000
Qchinese_cns11643_1,
Qchinese_cns11643_2,
#ifdef UTF2000
- Qucs,
+ Qmap_ucs, Qucs,
Qucs_bmp,
Qucs_smp,
Qucs_sip,
Qucs_bmp,
Qucs_smp,
Qucs_sip,
@@
-2370,6
+2370,7
@@
syms_of_mule_charset (void)
defsymbol (&Qchinese_cns11643_1, "chinese-cns11643-1");
defsymbol (&Qchinese_cns11643_2, "chinese-cns11643-2");
#ifdef UTF2000
defsymbol (&Qchinese_cns11643_1, "chinese-cns11643-1");
defsymbol (&Qchinese_cns11643_2, "chinese-cns11643-2");
#ifdef UTF2000
+ defsymbol (&Qmap_ucs, "=ucs");
defsymbol (&Qucs, "ucs");
defsymbol (&Qucs_bmp, "ucs-bmp");
defsymbol (&Qucs_smp, "ucs-smp");
defsymbol (&Qucs, "ucs");
defsymbol (&Qucs_bmp, "ucs-bmp");
defsymbol (&Qucs_smp, "ucs-smp");
@@
-2456,7
+2457,7
@@
complex_vars_of_mule_charset (void)
#ifdef UTF2000
staticpro (&Vcharset_ucs);
Vcharset_ucs =
#ifdef UTF2000
staticpro (&Vcharset_ucs);
Vcharset_ucs =
- make_charset (LEADING_BYTE_UCS, Qucs, 256, 4,
+ make_charset (LEADING_BYTE_UCS, Qmap_ucs, 256, 4,
1, 2, 0, CHARSET_LEFT_TO_RIGHT,
build_string ("UCS"),
build_string ("UCS"),
1, 2, 0, CHARSET_LEFT_TO_RIGHT,
build_string ("UCS"),
build_string ("UCS"),