Mercurial > hg > xemacs-beta

comparison src/mule-ccl.c @ 565:e9162e1ea200

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-05-24 09:53:05 by yoshiki] Fix build on Linux with MULE. * mule-ccl.c (Qccl_error): New error * mule-ccl.c (syms_of_mule_ccl): Initialize Qccl_error. * mule-charset.c (Fmake_charset): Call signal_error.
author yoshiki
date Thu, 24 May 2001 09:53:18 +0000
parents 183866b06e0b
children 023b83f4e54b
comparison
equal deleted inserted replaced
564:001628b7a5b3 565:e9162e1ea200
38 #else /* not emacs */ 38 #else /* not emacs */
39 39
40 #include "mulelib.h" 40 #include "mulelib.h"
41 41
42 #endif /* not emacs */ 42 #endif /* not emacs */
43
44 Lisp_Object Qccl_error;
43 45
44 /* This contains all code conversion map available to CCL. */ 46 /* This contains all code conversion map available to CCL. */
45 Lisp_Object Vcode_conversion_map_vector; 47 Lisp_Object Vcode_conversion_map_vector;
46 48
47 /* Alist of fontname patterns vs corresponding CCL program. */ 49 /* Alist of fontname patterns vs corresponding CCL program. */
2226 2228
2227 2229
2228 void 2230 void
2229 syms_of_mule_ccl (void) 2231 syms_of_mule_ccl (void)
2230 { 2232 {
2233 DEFERROR_STANDARD (Qccl_error, Qconversion_error);
2234
2231 DEFSUBR (Fccl_program_p); 2235 DEFSUBR (Fccl_program_p);
2232 DEFSUBR (Fccl_execute); 2236 DEFSUBR (Fccl_execute);
2233 DEFSUBR (Fccl_execute_on_string); 2237 DEFSUBR (Fccl_execute_on_string);
2234 DEFSUBR (Fregister_ccl_program); 2238 DEFSUBR (Fregister_ccl_program);
2235 DEFSUBR (Fregister_code_conversion_map); 2239 DEFSUBR (Fregister_code_conversion_map);