Mercurial > emacs

changeset 64763:0a5d4a20386e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Munge comment associated w/ last change to describe intent; nfc.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Sun, 07 Aug 2005 00:55:01 +0000
parents 41bb365f41c4
children c5788549eceb
files src/floatfns.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/floatfns.c	Sat Aug 06 22:13:43 2005 +0000
+++ b/src/floatfns.c	Sun Aug 07 00:55:01 2005 +0000
@@ -461,7 +461,7 @@
   CHECK_NUMBER_OR_FLOAT (arg2);
   if (INTEGERP (arg1)     /* common lisp spec */
       && INTEGERP (arg2)   /* don't promote, if both are ints, and */
-      && 0 <= XINT (arg2)) /* we are not computing the -ARG2 root */
+      && 0 <= XINT (arg2)) /* we are sure the result is not fractional */
     {				/* this can be improved by pre-calculating */
       EMACS_INT acc, x, y;	/* some binary powers of x then accumulating */
       Lisp_Object val;