comparison src/file-coding.c @ 528:ef4d2466a29c

[xemacs-hg @ 2001-05-10 09:59:45 by ben] implement user-name-all-completions under Windows. xemacs.mak: need another lib (netapi32.lib) for user-name-all-completions. emacs.c: create new function force-debugging-signal (only when DEBUG_XEMACS) to breakpoint or abort to the debugger. mule\mule-coding.el, file-coding.c, file-coding.h, lisp.h: move coding-system-charset to lisp to avoid doc warning. autoload.el, packages.el, startup.el, update-elc-2.el, update-elc.el: Rewrite much of the bootstrapping process to be more robust, and in particular to rebuild the auto-autoloads and custom-loads files no matter what state (including missing) they're currently in. xemacs.mak: remove autoload-building target. Makefile.in.in: remove autoload targets.
author ben
date Thu, 10 May 2001 09:59:57 +0000
parents 0784d089fdc9
children 183866b06e0b
comparison
equal deleted inserted replaced
527:7b35ad872326 528:ef4d2466a29c
1283 { 1283 {
1284 Lisp_Object cs 1284 Lisp_Object cs
1285 = XCODING_SYSTEM_ISO2022_INITIAL_CHARSET (coding_system, gnum); 1285 = XCODING_SYSTEM_ISO2022_INITIAL_CHARSET (coding_system, gnum);
1286 1286
1287 return CHARSETP (cs) ? XCHARSET_NAME (cs) : Qnil; 1287 return CHARSETP (cs) ? XCHARSET_NAME (cs) : Qnil;
1288 }
1289
1290 DEFUN ("coding-system-charset", Fcoding_system_charset, 2, 2, 0, /*
1291 Return initial charset of CODING-SYSTEM designated to GNUM.
1292 GNUM allows 0 .. 3.
1293 */
1294 (coding_system, gnum))
1295 {
1296 coding_system = Fget_coding_system (coding_system);
1297 CHECK_INT (gnum);
1298
1299 return coding_system_charset (coding_system, XINT (gnum));
1300 } 1288 }
1301 #endif /* MULE */ 1289 #endif /* MULE */
1302 1290
1303 DEFUN ("coding-system-property", Fcoding_system_property, 2, 2, 0, /* 1291 DEFUN ("coding-system-property", Fcoding_system_property, 2, 2, 0, /*
1304 Return the PROP property of CODING-SYSTEM. 1292 Return the PROP property of CODING-SYSTEM.
5617 DEFSUBR (Fdefine_coding_system_alias); 5605 DEFSUBR (Fdefine_coding_system_alias);
5618 DEFSUBR (Fsubsidiary_coding_system); 5606 DEFSUBR (Fsubsidiary_coding_system);
5619 5607
5620 DEFSUBR (Fcoding_system_type); 5608 DEFSUBR (Fcoding_system_type);
5621 DEFSUBR (Fcoding_system_doc_string); 5609 DEFSUBR (Fcoding_system_doc_string);
5622 #ifdef MULE
5623 DEFSUBR (Fcoding_system_charset);
5624 #endif
5625 DEFSUBR (Fcoding_system_property); 5610 DEFSUBR (Fcoding_system_property);
5626 5611
5627 DEFSUBR (Fcoding_category_list); 5612 DEFSUBR (Fcoding_category_list);
5628 DEFSUBR (Fset_coding_priority_list); 5613 DEFSUBR (Fset_coding_priority_list);
5629 DEFSUBR (Fcoding_priority_list); 5614 DEFSUBR (Fcoding_priority_list);