(Fexecute_extended_command): gcpro prefixarg.

This commit is contained in:
Richard M. Stallman
1996-09-04 03:58:15 +00:00
parent b839712d77
commit 214360e91f

View File

@@ -6898,12 +6898,12 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
Lisp_Object function;
char buf[40];
Lisp_Object saved_keys;
struct gcpro gcpro1;
struct gcpro gcpro1, gcpro2;
saved_keys = Fvector (this_command_key_count,
XVECTOR (this_command_keys)->contents);
buf[0] = 0;
GCPRO1 (saved_keys);
GCPRO1 (saved_keys, prefixarg);
if (EQ (prefixarg, Qminus))
strcpy (buf, "- ");