aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/emacs-module.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/emacs-module.c b/src/emacs-module.c
index 20dcff2b67a..d7704efcf6e 100644
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -614,8 +614,11 @@ module_copy_string_contents (emacs_env *env, emacs_value value, char *buffer,
614 614
615 if (*length < required_buf_size) 615 if (*length < required_buf_size)
616 { 616 {
617 ptrdiff_t actual = *length;
617 *length = required_buf_size; 618 *length = required_buf_size;
618 xsignal0 (Qargs_out_of_range); 619 args_out_of_range_3 (INT_TO_INTEGER (actual),
620 INT_TO_INTEGER (required_buf_size),
621 INT_TO_INTEGER (PTRDIFF_MAX));
619 } 622 }
620 623
621 *length = required_buf_size; 624 *length = required_buf_size;