/[emacs]/emacs/src/coding.c
ViewVC logotype

Diff of /emacs/src/coding.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.239.2.18 by handa, Wed May 22 11:30:00 2002 UTC revision 1.239.2.19 by handa, Thu May 23 10:54:07 2002 UTC
# Line 4346  decode_coding_charset (coding) Line 4346  decode_coding_charset (coding)
4346              {              {
4347                charset = CHARSET_FROM_ID (XFASTINT (val));                charset = CHARSET_FROM_ID (XFASTINT (val));
4348                dim = CHARSET_DIMENSION (charset);                dim = CHARSET_DIMENSION (charset);
4349                while (len++ < dim)                while (len < dim)
4350                  {                  {
4351                    ONE_MORE_BYTE (c);                    ONE_MORE_BYTE (c);
4352                    code = (code << 8) | c;                    code = (code << 8) | c;
4353                      len++;
4354                  }                  }
4355                CODING_DECODE_CHAR (coding, src, src_base, src_end,                CODING_DECODE_CHAR (coding, src, src_base, src_end,
4356                                    charset, code, c);                                    charset, code, c);
# Line 4363  decode_coding_charset (coding) Line 4364  decode_coding_charset (coding)
4364                  {                  {
4365                    charset = CHARSET_FROM_ID (XFASTINT (XCAR (val)));                    charset = CHARSET_FROM_ID (XFASTINT (XCAR (val)));
4366                    dim = CHARSET_DIMENSION (charset);                    dim = CHARSET_DIMENSION (charset);
4367                    while (len++ < dim)                    while (len < dim)
4368                      {                      {
4369                        ONE_MORE_BYTE (c);                        ONE_MORE_BYTE (c);
4370                        code = (code << 8) | c;                        code = (code << 8) | c;
4371                          len++;
4372                      }                      }
4373                    CODING_DECODE_CHAR (coding, src, src_base,                    CODING_DECODE_CHAR (coding, src, src_base,
4374                                        src_end, charset, code, c);                                        src_end, charset, code, c);
# Line 7420  usage: (define-coding-system-internal .. Line 7422  usage: (define-coding-system-internal ..
7422                  {                  {
7423                    dim2 = CHARSET_DIMENSION (CHARSET_FROM_ID (XFASTINT (tmp)));                    dim2 = CHARSET_DIMENSION (CHARSET_FROM_ID (XFASTINT (tmp)));
7424                    if (dim < dim2)                    if (dim < dim2)
                     tmp = Fcons (tmp, Fcons (XCAR (tail), Qnil));  
                   else  
7425                      tmp = Fcons (XCAR (tail), Fcons (tmp, Qnil));                      tmp = Fcons (XCAR (tail), Fcons (tmp, Qnil));
7426                      else
7427                        tmp = Fcons (tmp, Fcons (XCAR (tail), Qnil));
7428                  }                  }
7429                else                else
7430                  {                  {

Legend:
Removed from v.1.239.2.18  
changed lines
  Added in v.1.239.2.19

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26