Mercurial > hg > xemacs-beta
annotate src/emodules.h @ 5284:d27c1ee1943b
Make the order of preloaded-file-list more sane.
lisp/ChangeLog addition:
2010-10-12 Aidan Kehoe <kehoea@parhasard.net>
* abbrev.el (fundamental-mode-abbrev-table, global-abbrev-table):
Create both these abbrev tables using the usual
#'define-abbrev-table calls, rather than attempting to
special-case them.
* cl-extra.el: Force cl-macs to be loaded here, if cl-extra.el is
being loaded interpreted. Previously other, later files would
redundantly call (load "cl-macs") when interpreted, it's more
reasonable to do it here, once.
* cmdloop.el (read-quoted-char-radix): Use defcustom here, we
don't have any dump-order dependencies that would prevent that.
* custom.el (eval-when-compile): Don't load cl-macs when
interpreted or when byte-compiling, rely on cl-extra.el in the
former case and the appropriate entry in bytecomp-load-hook in the
latter. Get rid of custom-declare-variable-list, we have no
dump-time dependencies that would require it.
* faces.el (eval-when-compile): Don't load cl-macs when
interpreted or when byte-compiling.
* packages.el: Remove some inaccurate comments.
* post-gc.el (cleanup-simple-finalizers): Use #'delete-if-not
here, now the order of preloaded-file-list has been changed to
make it available.
* subr.el (custom-declare-variable-list): Remove. No need for it.
Also remove a stub define-abbrev-table from this file, given the
current order of preloaded-file-list there's no need for it.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Tue, 12 Oct 2010 21:11:46 +0100 |
parents | 3461165c79be |
children | 308d34e9f07d |
rev | line source |
---|---|
388 | 1 /* emodules.h - Declarations and definitions for XEmacs loadable modules. |
2 (C) Copyright 1998, 1999 J. Kean Johnston. All rights reserved. | |
3 | |
4 This file is part of XEmacs. | |
5 | |
6 XEmacs is free software; you can redistribute it and/or modify it | |
7 under the terms of the GNU General Public License as published by the | |
8 Free Software Foundation; either version 2, or (at your option) any | |
9 later version. | |
10 | |
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT | |
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
14 for more details. | |
15 | |
16 You should have received a copy of the GNU General Public License | |
17 along with XEmacs; see the file COPYING. If not, write to | |
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
19 Boston, MA 02111-1307, USA. */ | |
20 | |
21 #ifndef EMODULES_HDR | |
22 | |
23 #ifndef EMODULES_GATHER_VERSION | |
24 #define EMODULES_HDR | |
25 #endif | |
26 | |
996 | 27 #define EMODULES_VERSION "1.1.0" |
388 | 28 #define EMODULES_MAJOR 1 |
996 | 29 #define EMODULES_MINOR 1 |
388 | 30 #define EMODULES_PATCH 0 |
31 #define EMODULES_REVISION (long)((EMODULES_MAJOR * 1000) + \ | |
32 (EMODULES_MINOR * 10) + \ | |
33 (EMODULES_PATCH)) | |
34 | |
35 #ifndef EMODULES_GATHER_VERSION | |
36 #include <config.h> | |
37 #include "lisp.h" | |
38 #include "sysdep.h" | |
39 #include "window.h" | |
40 #include "buffer.h" | |
41 #include "insdel.h" | |
42 #include "frame.h" | |
43 #include "lstream.h" | |
44 #include "file-coding.h" | |
45 | |
46 /* Module loading technology version number */ | |
47 extern Lisp_Object Vmodule_version; | |
48 | |
49 /* XEmacs version Information */ | |
50 extern Lisp_Object Vemacs_major_version; | |
51 extern Lisp_Object Vemacs_minor_version; | |
52 | |
53 /* | |
54 * Load in a C module. The first argument is the name of the .so file, the | |
55 * second is the name of the module, and the third is the module version. | |
56 * If the module name is NULL, we will always reload the .so. If it is not | |
57 * NULL, we check to make sure we haven't loaded it before. If the version | |
442 | 58 * is specified, we check to make sure we didn't load the module of the |
388 | 59 * specified version before. We also use these as checks when we open the |
60 * module to make sure we have the right module. | |
61 */ | |
4952
19a72041c5ed
Mule-izing, various fixes related to char * arguments
Ben Wing <ben@xemacs.org>
parents:
2367
diff
changeset
|
62 extern void emodules_load (const Ibyte *module, const Ibyte *modname, |
19a72041c5ed
Mule-izing, various fixes related to char * arguments
Ben Wing <ben@xemacs.org>
parents:
2367
diff
changeset
|
63 const Ibyte *modver); |
388 | 64 |
65 /* | |
66 * Because subrs and symbols added by a dynamic module are not part of | |
67 * the make-docfile process, we need a clean way to get the variables | |
442 | 68 * and functions documented. Since people don't like the idea of making |
388 | 69 * shared modules use different versions of DEFSUBR() and DEFVAR_LISP() |
70 * and friends, we need these two functions to insert the documentation | |
71 * into the right place. These functions will be called by the module | |
72 * init code, generated by ellcc during initialization mode. | |
73 */ | |
4956
3461165c79be
fix compile errors due to mismatched string pointer types
Ben Wing <ben@xemacs.org>
parents:
4952
diff
changeset
|
74 EXTERN_C MODULE_API void emodules_doc_subr (const Ascbyte *objname, |
3461165c79be
fix compile errors due to mismatched string pointer types
Ben Wing <ben@xemacs.org>
parents:
4952
diff
changeset
|
75 const Ascbyte *docstr); |
3461165c79be
fix compile errors due to mismatched string pointer types
Ben Wing <ben@xemacs.org>
parents:
4952
diff
changeset
|
76 EXTERN_C MODULE_API void emodules_doc_sym (const Ascbyte *objname, |
3461165c79be
fix compile errors due to mismatched string pointer types
Ben Wing <ben@xemacs.org>
parents:
4952
diff
changeset
|
77 const Ascbyte *docstr); |
388 | 78 |
79 #define CDOCSUBR(Fname, DOC) emodules_doc_subr (Fname, DOC) | |
80 #define CDOCSYM(Sname, DOC) emodules_doc_sym (Sname, DOC) | |
81 #endif /* EMODULES_GATHER_VERSION */ | |
82 | |
996 | 83 /* We should not expose module entities to the portable dumper. */ |
1632 | 84 #if defined(PDUMP) && defined(EMACS_MODULE) |
2367 | 85 #undef dump_add_root_block_ptr |
86 #define dump_add_root_block_ptr(varaddr,descaddr) DO_NOTHING | |
1220 | 87 #undef dump_add_opaque |
996 | 88 #define dump_add_opaque(varaddr,size) DO_NOTHING |
1220 | 89 #undef dump_add_root_block |
996 | 90 #define dump_add_root_block(ptraddress,desc) DO_NOTHING |
1111 | 91 #undef dump_add_opaque_int |
996 | 92 #define dump_add_opaque_int(int_varaddr) DO_NOTHING |
1111 | 93 #undef dump_add_opaque_fixnum |
996 | 94 #define dump_add_opaque_fixnum(fixnum_varaddr) DO_NOTHING |
1220 | 95 #undef dump_add_root_lisp_object |
1204 | 96 #define dump_add_root_lisp_object(varaddr) DO_NOTHING |
1220 | 97 #undef dump_add_weak_object_chain |
996 | 98 #define dump_add_weak_object_chain(varaddr) DO_NOTHING |
1111 | 99 #undef staticpro |
996 | 100 #define staticpro(DSF_location) staticpro_nodump(DSF_location) |
1632 | 101 #undef unstaticpro |
102 #define unstaticpro(DSF_location) unstaticpro_nodump(DFS_location) | |
996 | 103 |
104 #undef DEFSYMBOL | |
1220 | 105 #define DEFSYMBOL(name) DEFSYMBOL_NO_DUMP (name) |
996 | 106 #undef DEFSYMBOL_MULTIWORD_PREDICATE |
107 #define DEFSYMBOL_MULTIWORD_PREDICATE(name) \ | |
108 DEFSYMBOL_MULTIWORD_PREDICATE_NO_DUMP (name) | |
1220 | 109 #undef defsymbol |
996 | 110 #define defsymbol(location,name) defsymbol_nodump (location, name) |
1632 | 111 |
112 #endif /* defined(PDUMP) && defined(EMACS_MODULE) */ | |
996 | 113 |
388 | 114 #endif /* EMODULES_HDR */ |