|
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 /* Load path */
|
|
|
50 extern Lisp_Object Vmodule_load_path;
|
|
|
51
|
|
|
52 /* XEmacs version Information */
|
|
|
53 extern Lisp_Object Vemacs_major_version;
|
|
|
54 extern Lisp_Object Vemacs_minor_version;
|
|
|
55
|
|
|
56 /*
|
|
|
57 * Load in a C module. The first argument is the name of the .so file, the
|
|
|
58 * second is the name of the module, and the third is the module version.
|
|
|
59 * If the module name is NULL, we will always reload the .so. If it is not
|
|
|
60 * NULL, we check to make sure we haven't loaded it before. If the version
|
|
442
|
61 * is specified, we check to make sure we didn't load the module of the
|
|
388
|
62 * specified version before. We also use these as checks when we open the
|
|
|
63 * module to make sure we have the right module.
|
|
|
64 */
|
|
442
|
65 extern void emodules_load (const char *module, const char *name, const char *version);
|
|
388
|
66
|
|
|
67 /*
|
|
|
68 * Because subrs and symbols added by a dynamic module are not part of
|
|
|
69 * the make-docfile process, we need a clean way to get the variables
|
|
442
|
70 * and functions documented. Since people don't like the idea of making
|
|
388
|
71 * shared modules use different versions of DEFSUBR() and DEFVAR_LISP()
|
|
|
72 * and friends, we need these two functions to insert the documentation
|
|
|
73 * into the right place. These functions will be called by the module
|
|
|
74 * init code, generated by ellcc during initialization mode.
|
|
|
75 */
|
|
442
|
76 extern void emodules_doc_subr (const char *objname, const char *docstr);
|
|
|
77 extern void emodules_doc_sym (const char *objname, const char *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. */
|
|
|
84 #if defined(PDUMP) && !defined(EMODULES_DO_NOT_REDEFINE)
|
|
1220
|
85 #undef dump_add_root_struct_ptr
|
|
996
|
86 #define dump_add_root_struct_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)
|
|
|
101
|
|
|
102 #undef DEFSYMBOL
|
|
1220
|
103 #define DEFSYMBOL(name) DEFSYMBOL_NO_DUMP (name)
|
|
996
|
104 #undef DEFSYMBOL_MULTIWORD_PREDICATE
|
|
|
105 #define DEFSYMBOL_MULTIWORD_PREDICATE(name) \
|
|
|
106 DEFSYMBOL_MULTIWORD_PREDICATE_NO_DUMP (name)
|
|
1220
|
107 #undef defsymbol
|
|
996
|
108 #define defsymbol(location,name) defsymbol_nodump (location, name)
|
|
|
109 #endif
|
|
|
110
|
|
388
|
111 #endif /* EMODULES_HDR */
|
