masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-09 21:50:50 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

(setup_coding_system): Properly check for nil.

Browse source
This commit is contained in:
Andreas Schwab 1998-04-29 09:33:53 +00:00
parent 28ae27ae28
commit f82423d721
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/coding.c
View file

@ -3050,10 +3050,10 @@ setup_coding_system (coding_system, coding)
if (CONSP (val)
&& SYMBOLP (XCONS (val)->car)
&& !NILP (decoder = Fget (XCONS (val)->car, Qccl_program_idx))
&& (decoder = Fcdr (Faref (Vccl_program_table, decoder)))
&& !NILP (decoder = Fcdr (Faref (Vccl_program_table, decoder)))
&& SYMBOLP (XCONS (val)->cdr)
&& !NILP (encoder = Fget (XCONS (val)->cdr, Qccl_program_idx))
&& (encoder = Fcdr (Faref (Vccl_program_table, encoder))))
&& !NILP (encoder = Fcdr (Faref (Vccl_program_table, encoder))))
{
setup_ccl_program (&(coding->spec.ccl.decoder), decoder);
setup_ccl_program (&(coding->spec.ccl.encoder), encoder);