diff options
Diffstat (limited to 'src/coding.c')
| -rw-r--r-- | src/coding.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/coding.c b/src/coding.c index a31e3ea8bce..cf6bab223bb 100644 --- a/src/coding.c +++ b/src/coding.c | |||
| @@ -2851,7 +2851,12 @@ setup_coding_system (coding_system, coding) | |||
| 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])) |