summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/emacs-module.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/emacs-module.c b/src/emacs-module.c
index 5c413ee0556..2693a4529d6 100644
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -768,6 +768,9 @@ funcall_module (Lisp_Object function, ptrdiff_t nargs, Lisp_Object *arglist)
USE_SAFE_ALLOCA;
ATTRIBUTE_MAY_ALIAS emacs_value *args;
if (plain_values && ! module_assertions)
+ /* FIXME: The cast below is incorrect because the argument array
+ is not declared as const, so module functions can modify it.
+ Either declare it as const, or remove this branch. */
args = (emacs_value *) arglist;
else
{