* fns.c (Fload_average): Don't assume 100 * load average fits in int.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/fns.c b/src/fns.c
index 69b95cba09c..a19c886e3e1 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -2542,8 +2542,8 @@ advisable.  */)
 
   while (loads-- > 0)
     {
-      Lisp_Object load = (NILP (use_floats) ?
-                          make_number ((int) (100.0 * load_ave[loads]))
+      Lisp_Object load = (NILP (use_floats)
+                          ? make_number (100.0 * load_ave[loads])
                           : make_float (load_ave[loads]));
       ret = Fcons (load, ret);
     }