diff options
| author | Philipp Stephani <phst@google.com> | 2017-06-04 18:57:51 +0200 |
|---|---|---|
| committer | Philipp Stephani <phst@google.com> | 2017-06-04 19:50:49 +0200 |
| commit | 3b0080de52db1756fc47f1642ee9980655421af9 (patch) | |
| tree | 5d2a765a0ef67144461de82fbc4043a9cb5de378 /src/lisp.h | |
| parent | 18396997b30c053a905c9a509777625ccc01c3d5 (diff) | |
| download | emacs-3b0080de52db1756fc47f1642ee9980655421af9.tar.gz emacs-3b0080de52db1756fc47f1642ee9980655421af9.tar.bz2 emacs-3b0080de52db1756fc47f1642ee9980655421af9.zip | |
Rework printing of module functions
Fix a FIXME in emacs-module.c. Put the printing into print.c, like
other types.
* src/print.c (print_vectorlike): Add code to print module functions.
* src/emacs-module.c (funcall_module): Stop calling
'module_format_fun_env'. Now that module functions are first-class
objects, they can be added to signal data directly.
(module_handle_signal): Remove now-unused function
'module_format_fun_env'.
* test/src/emacs-module-tests.el (mod-test-sum-test): Adapt unit test.
* src/eval.c (funcall_lambda): Adapt call to changed signature of
'funcall_module'.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/lisp.h b/src/lisp.h index 7b8f1e754d8..ce939fcee62 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -3952,10 +3952,8 @@ XMODULE_FUNCTION (Lisp_Object o) extern Lisp_Object make_user_ptr (void (*finalizer) (void *), void *p); /* Defined in emacs-module.c. */ -extern Lisp_Object funcall_module (const struct Lisp_Module_Function *, - ptrdiff_t, Lisp_Object *); +extern Lisp_Object funcall_module (Lisp_Object, ptrdiff_t, Lisp_Object *); extern Lisp_Object module_function_arity (const struct Lisp_Module_Function *); -extern Lisp_Object module_format_fun_env (const struct Lisp_Module_Function *); extern void syms_of_module (void); #endif |