Mercurial > emacs
comparison src/coding.c @ 18310:a97ed8efcb6a
(detect_coding_iso2022): Initilize mask correctly.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 18 Jun 1997 13:09:00 +0000 |
| parents | 888bfd80db2c |
| children | 6b5af78c8b21 |
comparison
equal
deleted
inserted
replaced
| 18309:bd8b521f5218 | 18310:a97ed8efcb6a |
|---|---|
| 591 | 591 |
| 592 int | 592 int |
| 593 detect_coding_iso2022 (src, src_end) | 593 detect_coding_iso2022 (src, src_end) |
| 594 unsigned char *src, *src_end; | 594 unsigned char *src, *src_end; |
| 595 { | 595 { |
| 596 int mask = CODING_CATEGORY_MASK_ANY; | 596 int mask = (CODING_CATEGORY_MASK_ISO_7 |
| 597 | CODING_CATEGORY_MASK_ISO_8_1 | |
| 598 | CODING_CATEGORY_MASK_ISO_8_2 | |
| 599 | CODING_CATEGORY_MASK_ISO_ELSE); | |
| 597 int g1 = 0; /* 1 iff designating to G1. */ | 600 int g1 = 0; /* 1 iff designating to G1. */ |
| 598 int c, i; | 601 int c, i; |
| 599 | 602 |
| 600 while (src < src_end) | 603 while (src < src_end) |
| 601 { | 604 { |
| 610 && ((c >= '(' && c <= '/') | 613 && ((c >= '(' && c <= '/') |
| 611 || c == '$' && ((*src >= '(' && *src <= '/') | 614 || c == '$' && ((*src >= '(' && *src <= '/') |
| 612 || (*src >= '@' && *src <= 'B')))) | 615 || (*src >= '@' && *src <= 'B')))) |
| 613 { | 616 { |
| 614 /* Valid designation sequence. */ | 617 /* Valid designation sequence. */ |
| 615 mask &= (CODING_CATEGORY_MASK_ISO_7 | |
| 616 | CODING_CATEGORY_MASK_ISO_8_1 | |
| 617 | CODING_CATEGORY_MASK_ISO_8_2 | |
| 618 | CODING_CATEGORY_MASK_ISO_ELSE); | |
| 619 if (c == ')' || (c == '$' && *src == ')')) | 618 if (c == ')' || (c == '$' && *src == ')')) |
| 620 { | 619 { |
| 621 g1 = 1; | 620 g1 = 1; |
| 622 mask &= ~CODING_CATEGORY_MASK_ISO_7; | 621 mask &= ~CODING_CATEGORY_MASK_ISO_7; |
| 623 } | 622 } |