Commit 5260234d authored by Richard M. Stallman's avatar Richard M. Stallman

(arith_driver): Make accum and next EMACS_INTs.

(Fmod): i1 and i2 are EMACS_INT.
parent 1df90f8f
...@@ -1707,8 +1707,8 @@ arith_driver (code, nargs, args) ...@@ -1707,8 +1707,8 @@ arith_driver (code, nargs, args)
{ {
register Lisp_Object val; register Lisp_Object val;
register int argnum; register int argnum;
register int accum; register EMACS_INT accum;
register int next; register EMACS_INT next;
switch (SWITCH_ENUM_CAST (code)) switch (SWITCH_ENUM_CAST (code))
{ {
...@@ -1917,7 +1917,7 @@ Both X and Y must be numbers or markers.") ...@@ -1917,7 +1917,7 @@ Both X and Y must be numbers or markers.")
register Lisp_Object num1, num2; register Lisp_Object num1, num2;
{ {
Lisp_Object val; Lisp_Object val;
int i1, i2; EMACS_INT i1, i2;
#ifdef LISP_FLOAT_TYPE #ifdef LISP_FLOAT_TYPE
CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (num1, 0); CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (num1, 0);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment