[Emacs-diffs] master 88c91f5: * src/emacs-module.c (funcall_module): Add a nontrivial assertion

[Philipp Stephani]

branch: master
commit 88c91f53dfd8d29475e2a4794da8b497b62cd53b
Author: Philipp Stephani <address@hidden>
Commit: Philipp Stephani <address@hidden>

    * src/emacs-module.c (funcall_module): Add a nontrivial assertion
---
 src/emacs-module.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/emacs-module.c b/src/emacs-module.c
index 685bdb8..6b56146 100644
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -902,6 +902,11 @@ funcall_module (Lisp_Object function, ptrdiff_t nargs, 
Lisp_Object *arglist)
        memory_full (sizeof *args[i]);
     }
 
+  /* The only possibility of getting an error until here is failure to
+     allocate memory for the arguments, but then we already should
+     have signaled an error before.  */
+  eassert (priv.pending_non_local_exit == emacs_funcall_exit_return);
+
   emacs_value ret = func->subr (env, nargs, args, func->data);
 
   eassert (&priv == env->private_members);