comparison src/coding.c @ 18860:f55d91d45bde

(Ffind_operation_coding_system): Use Ffboundp to check for a function entry.
author Richard M. Stallman <rms@gnu.org>
date Fri, 18 Jul 1997 22:55:49 +0000
parents 954e6be0a757
children 50c89868f8c7
comparison
equal deleted inserted replaced
18859:e3166a5ad35d 18860:f55d91d45bde
3568 return val; 3568 return val;
3569 if (! SYMBOLP (val)) 3569 if (! SYMBOLP (val))
3570 return Qnil; 3570 return Qnil;
3571 if (! NILP (Fcoding_system_p (val))) 3571 if (! NILP (Fcoding_system_p (val)))
3572 return Fcons (val, val); 3572 return Fcons (val, val);
3573 if (!NILP (Fboundp (val))) 3573 if (!NILP (Ffboundp (val)))
3574 return call1 (val, Flist (nargs, args)); 3574 return call1 (val, Flist (nargs, args));
3575 return Qnil; 3575 return Qnil;
3576 } 3576 }
3577 } 3577 }
3578 return Qnil; 3578 return Qnil;