Mercurial > emacs

diff src/floatfns.c @ 12537:476296adb950

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fexpt): Use EMACS_INT for integer calculation. (Ffloor): Likewise.
author Karl Heuer <kwzh@gnu.org>
date Mon, 17 Jul 1995 22:18:04 +0000
parents 8d57babf4b36
children 941c37982f37
line wrap: on
line diff
--- a/src/floatfns.c	Mon Jul 17 22:17:19 1995 +0000
+++ b/src/floatfns.c	Mon Jul 17 22:18:04 1995 +0000
@@ -447,7 +447,7 @@
   if (INTEGERP (arg1)     /* common lisp spec */
       && INTEGERP (arg2)) /* don't promote, if both are ints */
     {				/* this can be improved by pre-calculating */
-      int acc, x, y;		/* some binary powers of x then accumulating */
+      EMACS_INT acc, x, y;	/* some binary powers of x then accumulating */
       Lisp_Object val;
 
       x = XINT (arg1);
@@ -747,7 +747,7 @@
 
   if (! NILP (divisor))
     {
-      int i1, i2;
+      EMACS_INT i1, i2;
 
       CHECK_NUMBER_OR_FLOAT (divisor, 1);