(arith_driver): Make accum and next EMACS_INTs.

(Fmod): i1 and i2 are EMACS_INT.

diff --git a/src/data.c b/src/data.c
index 2dc25cf8301a078ae59f6dc164e91c6aa6a107ed..af5f67fa2276df6567ed795e2f37e8f113918523 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -1707,8 +1707,8 @@ arith_driver (code, nargs, args)
 {
   register Lisp_Object val;
   register int argnum;
-  register int accum;
-  register int next;
+  register EMACS_INT accum;
+  register EMACS_INT next;
 
   switch (SWITCH_ENUM_CAST (code))
     {
@@ -1917,7 +1917,7 @@ Both X and Y must be numbers or markers.")
      register Lisp_Object num1, num2;
 {
   Lisp_Object val;
-  int i1, i2;
+  EMACS_INT i1, i2;
 
 #ifdef LISP_FLOAT_TYPE
   CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (num1, 0);