1 files changed, 1 insertions, 1 deletions

diff --git a/src/floatfns.c b/src/floatfns.c
index 1232fc0afa1..b5c8b4af5c3 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -507,7 +507,7 @@ DEFUN ("expt", Fexpt, Sexpt, 2, 2, 0,
               if (y & 1)
                 acc *= x;
               x *= x;
-              y = (unsigned)y >> 1;
+              y >>= 1;
             }
         }
       XSETINT (val, acc);