1 files changed, 1 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 4f66fbd4d35..a526739d0e7 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -824,7 +824,7 @@ significance.")
  XSETFASTINT (len, nargs);
  if (!NILP (Vpurify_flag))
-    val = make_pure_vector (XFASTINT (len));
+    val = make_pure_vector ((EMACS_INT) nargs);
  else
    val = Fmake_vector (len, Qnil);
  p = XVECTOR (val);

diff --git a/src/alloc.c b/src/alloc.c index 4f66fbd4d35..a526739d0e7 100644 --- a/src/alloc.c +++ b/src/alloc.c
@@ -824,7 +824,7 @@ significance.")
824		824
825	XSETFASTINT (len, nargs);	825	XSETFASTINT (len, nargs);
826	if (!NILP (Vpurify_flag))	826	if (!NILP (Vpurify_flag))
827	val = make_pure_vector (XFASTINT (len));	827	val = make_pure_vector ((EMACS_INT) nargs);
828	else	828	else
829	val = Fmake_vector (len, Qnil);	829	val = Fmake_vector (len, Qnil);
830	p = XVECTOR (val);	830	p = XVECTOR (val);