* callint.c (Fcall_interactively): Don't use index var as event count.

2 files changed, 4 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 3d137a16a4c..e4e95ba5aa0 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-06-14  Paul Eggert  <eggert@cs.ucla.edu>
 
+        * callint.c (Fcall_interactively): Don't use index var as event count.
+
         * vm-limit.c (check_memory_limits): Fix incorrect extern function decls.
         * mem-limits.h (SIZE): Remove; no longer used.
 
diff --git a/src/callint.c b/src/callint.c
index 2cc3a7cb537..29bb7ccc409 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -339,7 +339,7 @@ invoke it.  If KEYS is omitted or nil, the return value of
     {
       Lisp_Object input;
       Lisp_Object funval = Findirect_function (function, Qt);
-      i = num_input_events;
+      size_t events = num_input_events;
       input = specs;
       /* Compute the arg values using the user's expression.  */
       GCPRO2 (input, filter_specs);
@@ -347,7 +347,7 @@ invoke it.  If KEYS is omitted or nil, the return value of
                      CONSP (funval) && EQ (Qclosure, XCAR (funval))
                      ? Qt : Qnil);
       UNGCPRO;
-      if (i != num_input_events || !NILP (record_flag))
+      if (events != num_input_events || !NILP (record_flag))
         {
           /* We should record this command on the command history.  */
           Lisp_Object values;