diff options
| author | Philipp Stephani | 2019-04-24 23:12:35 +0200 |
|---|---|---|
| committer | Philipp Stephani | 2019-04-24 23:12:35 +0200 |
| commit | d2e1bac47816fa1f48482faeebf7fa562a5b0e40 (patch) | |
| tree | 85eda43e37e3df0b74a2d82cf313c28bbfefa27c /src/print.c | |
| parent | 4c90369d77d3db1cbd37df7857e4706176fd7ba2 (diff) | |
| download | emacs-d2e1bac47816fa1f48482faeebf7fa562a5b0e40.tar.gz emacs-d2e1bac47816fa1f48482faeebf7fa562a5b0e40.zip | |
Move definition of Lisp_Module_Function to emacs-module.c.
* src/lisp.h: Remove include of emacs-module.h. Remove definition
of Lisp_Module_Function structure.
* src/emacs-module.c (module_function_documentation)
(module_function_address): New accessor functions for module function
fields.
(emacs_subr, struct Lisp_Module_Function): Move from lisp.h.
* src/print.c (print_vectorlike):
* src/doc.c (Fdocumentation): Use the new accessor functions.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/print.c b/src/print.c index 081e5574b73..8b163e3ee39 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -1787,8 +1787,8 @@ print_vectorlike (Lisp_Object obj, Lisp_Object printcharfun, bool escapeflag, | |||
| 1787 | case PVEC_MODULE_FUNCTION: | 1787 | case PVEC_MODULE_FUNCTION: |
| 1788 | { | 1788 | { |
| 1789 | print_c_string ("#<module function ", printcharfun); | 1789 | print_c_string ("#<module function ", printcharfun); |
| 1790 | void *ptr = XMODULE_FUNCTION (obj)->subr; | 1790 | void *ptr = module_function_address (XMODULE_FUNCTION (obj)); |
| 1791 | const char *file = NULL; | 1791 | const char *file = NULL; |
| 1792 | const char *symbol = NULL; | 1792 | const char *symbol = NULL; |
| 1793 | dynlib_addr (ptr, &file, &symbol); | 1793 | dynlib_addr (ptr, &file, &symbol); |
| 1794 | 1794 | ||