aboutsummaryrefslogtreecommitdiffstats
path: root/src/callint.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/callint.c')
-rw-r--r--src/callint.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/callint.c b/src/callint.c
index 3a595b57d77..43566acfbe9 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -509,8 +509,9 @@ invoke it. If KEYS is omitted or nil, the return value of
509 visargs = args + nargs; 509 visargs = args + nargs;
510 varies = (signed char *) (visargs + nargs); 510 varies = (signed char *) (visargs + nargs);
511 511
512 verify (NIL_IS_ZERO);
513 memset (args, 0, nargs * (2 * word_size + 1)); 512 memset (args, 0, nargs * (2 * word_size + 1));
513 if (NIL_IS_NONZERO)
514 memsetnil (args, nargs * 2);
514 515
515 GCPRO5 (prefix_arg, function, *args, *visargs, up_event); 516 GCPRO5 (prefix_arg, function, *args, *visargs, up_event);
516 gcpro3.nvars = nargs; 517 gcpro3.nvars = nargs;