[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/coding.c [emacs-unicode-2]
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/src/coding.c [emacs-unicode-2] |
Date: |
Sun, 23 Nov 2003 21:21:56 -0500 |
Index: emacs/src/coding.c
diff -c emacs/src/coding.c:1.289.2.9 emacs/src/coding.c:1.289.2.10
*** emacs/src/coding.c:1.289.2.9 Sat Nov 22 21:17:20 2003
--- emacs/src/coding.c Sun Nov 23 21:21:55 2003
***************
*** 8119,8152 ****
If Nth element is a list of charset IDs, N is the first byte
of one of them. The list is sorted by dimensions of the
charsets. A charset of smaller dimension comes firtst. */
- Lisp_Object list;
- int maybe_ascii_compatible = 1;
-
- for (list = Qnil, tail = charset_list; CONSP (tail); tail = XCDR (tail))
- {
- struct charset *charset = CHARSET_FROM_ID (XFASTINT (XCAR (tail)));
-
- if (charset->method == CHARSET_METHOD_SUPERSET)
- {
- val = CHARSET_SUPERSET (charset);
- for (; CONSP (val); val = XCDR (val))
- list = Fcons (XCAR (XCAR (val)), list);
- maybe_ascii_compatible = 0;
- }
- else
- list = Fcons (XCAR (tail), list);
- }
-
val = Fmake_vector (make_number (256), Qnil);
! for (tail = Fnreverse (list); CONSP (tail); tail = XCDR (tail))
{
struct charset *charset = CHARSET_FROM_ID (XFASTINT (XCAR (tail)));
int dim = CHARSET_DIMENSION (charset);
int idx = (dim - 1) * 4;
! if (CHARSET_ASCII_COMPATIBLE_P (charset)
! && maybe_ascii_compatible)
CODING_ATTR_ASCII_COMPAT (attrs) = Qt;
for (i = charset->code_space[idx];
--- 8119,8133 ----
If Nth element is a list of charset IDs, N is the first byte
of one of them. The list is sorted by dimensions of the
charsets. A charset of smaller dimension comes firtst. */
val = Fmake_vector (make_number (256), Qnil);
! for (tail = charset_list; CONSP (tail); tail = XCDR (tail))
{
struct charset *charset = CHARSET_FROM_ID (XFASTINT (XCAR (tail)));
int dim = CHARSET_DIMENSION (charset);
int idx = (dim - 1) * 4;
! if (CHARSET_ASCII_COMPATIBLE_P (charset))
CODING_ATTR_ASCII_COMPAT (attrs) = Qt;
for (i = charset->code_space[idx];