aboutsummaryrefslogtreecommitdiffstats
path: root/src/floatfns.c
diff options
context:
space:
mode:
authorJim Blandy1993-06-09 11:59:12 +0000
committerJim Blandy1993-06-09 11:59:12 +0000
commiteb8c3be94e12644f506b8857e49ffef88046bb0b (patch)
tree505c4ea5ae59214e4d6e749047d160c98191c9d2 /src/floatfns.c
parent16a4a21d0117ef5ed346f340f244fe199d3c8a26 (diff)
downloademacs-eb8c3be94e12644f506b8857e49ffef88046bb0b.tar.gz
emacs-eb8c3be94e12644f506b8857e49ffef88046bb0b.zip
Apply typo patches from Paul Eggert.
Diffstat (limited to 'src/floatfns.c')
-rw-r--r--src/floatfns.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/floatfns.c b/src/floatfns.c
index abc873688e4..ca50a920f3c 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -405,8 +405,8 @@ DEFUN ("expt", Fexpt, Sexpt, 2, 2, 0,
405 if ((XTYPE (arg1) == Lisp_Int) && /* common lisp spec */ 405 if ((XTYPE (arg1) == Lisp_Int) && /* common lisp spec */
406 (XTYPE (arg2) == Lisp_Int)) /* don't promote, if both are ints */ 406 (XTYPE (arg2) == Lisp_Int)) /* don't promote, if both are ints */
407 { /* this can be improved by pre-calculating */ 407 { /* this can be improved by pre-calculating */
408 int acc, x, y; /* some binary powers of x then acumulating */ 408 int acc, x, y; /* some binary powers of x then accumulating */
409 /* these, therby saving some time. -wsr */ 409 /* these, thereby saving some time. -wsr */
410 x = XINT (arg1); 410 x = XINT (arg1);
411 y = XINT (arg2); 411 y = XINT (arg2);
412 acc = 1; 412 acc = 1;