diff options
Diffstat (limited to 'src/emacs-module.c')
| -rw-r--r-- | src/emacs-module.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/emacs-module.c b/src/emacs-module.c index 3a246637990..5b9f6629e76 100644 --- a/src/emacs-module.c +++ b/src/emacs-module.c | |||
| @@ -786,7 +786,6 @@ funcall_module (Lisp_Object function, ptrdiff_t nargs, Lisp_Object *arglist) | |||
| 786 | } | 786 | } |
| 787 | 787 | ||
| 788 | emacs_value ret = func->subr (env, nargs, args, func->data); | 788 | emacs_value ret = func->subr (env, nargs, args, func->data); |
| 789 | SAFE_FREE (); | ||
| 790 | 789 | ||
| 791 | eassert (&priv == env->private_members); | 790 | eassert (&priv == env->private_members); |
| 792 | 791 | ||
| @@ -795,7 +794,7 @@ funcall_module (Lisp_Object function, ptrdiff_t nargs, Lisp_Object *arglist) | |||
| 795 | maybe_quit (); | 794 | maybe_quit (); |
| 796 | 795 | ||
| 797 | module_signal_or_throw (&priv); | 796 | module_signal_or_throw (&priv); |
| 798 | return unbind_to (count, value_to_lisp (ret)); | 797 | return SAFE_FREE_UNBIND_TO (count, value_to_lisp (ret)); |
| 799 | } | 798 | } |
| 800 | 799 | ||
| 801 | Lisp_Object | 800 | Lisp_Object |