Mercurial > emacs
comparison src/coding.c @ 89207:c232917f49f7
(decode_coding): Fix args to translate_chars. Pay
attention to Vstandard_translation_table_for_decode.
(encode_coding): Fix args to translate_chars. Pay attention to
Vstandard_translation_table_for_encode.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Tue, 15 Oct 2002 01:15:52 +0000 |
parents | 311d061195ef |
children | 00d976320a16 |
comparison
equal
deleted
inserted
replaced
89206:5e72879267f8 | 89207:c232917f49f7 |
---|---|
5582 { | 5582 { |
5583 coding_set_source (coding); | 5583 coding_set_source (coding); |
5584 coding->annotated = 0; | 5584 coding->annotated = 0; |
5585 (*(coding->decoder)) (coding); | 5585 (*(coding->decoder)) (coding); |
5586 if (!NILP (CODING_ATTR_DECODE_TBL (attrs))) | 5586 if (!NILP (CODING_ATTR_DECODE_TBL (attrs))) |
5587 translate_chars (CODING_ATTR_DECODE_TBL (attrs), coding); | 5587 translate_chars (coding, CODING_ATTR_DECODE_TBL (attrs)); |
5588 else if (!NILP (Vstandard_translation_table_for_decode)) | |
5589 translate_chars (coding, Vstandard_translation_table_for_decode); | |
5588 coding_set_destination (coding); | 5590 coding_set_destination (coding); |
5589 produce_chars (coding); | 5591 produce_chars (coding); |
5590 if (coding->annotated) | 5592 if (coding->annotated) |
5591 produce_annotation (coding); | 5593 produce_annotation (coding); |
5592 } | 5594 } |
5766 do { | 5768 do { |
5767 coding_set_source (coding); | 5769 coding_set_source (coding); |
5768 consume_chars (coding); | 5770 consume_chars (coding); |
5769 | 5771 |
5770 if (!NILP (CODING_ATTR_ENCODE_TBL (attrs))) | 5772 if (!NILP (CODING_ATTR_ENCODE_TBL (attrs))) |
5771 translate_chars (CODING_ATTR_ENCODE_TBL (attrs), coding); | 5773 translate_chars (coding, CODING_ATTR_ENCODE_TBL (attrs)); |
5774 else if (!NILP (Vstandard_translation_table_for_encode)) | |
5775 translate_chars (coding, Vstandard_translation_table_for_encode); | |
5772 | 5776 |
5773 coding_set_destination (coding); | 5777 coding_set_destination (coding); |
5774 (*(coding->encoder)) (coding); | 5778 (*(coding->encoder)) (coding); |
5775 } while (coding->consumed_char < coding->src_chars); | 5779 } while (coding->consumed_char < coding->src_chars); |
5776 | 5780 |