Mercurial > emacs
comparison src/coding.c @ 24460:be35d27a4bfb
(setup_coding_system): Check for CODING_SYSTEM = nil.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 09 Mar 1999 11:55:12 +0000 |
| parents | 61c6b3be1d51 |
| children | 219c99669e4b |
comparison
equal
deleted
inserted
replaced
| 24459:4e6a6d86b3af | 24460:be35d27a4bfb |
|---|---|
| 2849 coding->symbol = coding_system; | 2849 coding->symbol = coding_system; |
| 2850 coding->common_flags = 0; | 2850 coding->common_flags = 0; |
| 2851 coding->mode = 0; | 2851 coding->mode = 0; |
| 2852 coding->heading_ascii = -1; | 2852 coding->heading_ascii = -1; |
| 2853 coding->post_read_conversion = coding->pre_write_conversion = Qnil; | 2853 coding->post_read_conversion = coding->pre_write_conversion = Qnil; |
| 2854 | |
| 2855 if (NILP (coding_system)) | |
| 2856 goto label_invalid_coding_system; | |
| 2857 | |
| 2854 coding_spec = Fget (coding_system, Qcoding_system); | 2858 coding_spec = Fget (coding_system, Qcoding_system); |
| 2859 | |
| 2855 if (!VECTORP (coding_spec) | 2860 if (!VECTORP (coding_spec) |
| 2856 || XVECTOR (coding_spec)->size != 5 | 2861 || XVECTOR (coding_spec)->size != 5 |
| 2857 || !CONSP (XVECTOR (coding_spec)->contents[3])) | 2862 || !CONSP (XVECTOR (coding_spec)->contents[3])) |
| 2858 goto label_invalid_coding_system; | 2863 goto label_invalid_coding_system; |
| 2859 | 2864 |