diff --git a/libguile/stime.c b/libguile/stime.c
index a29fceb3a..f95a85301 100644
--- a/libguile/stime.c
+++ b/libguile/stime.c
@@ -202,7 +202,7 @@ scm_gettimeofday (void)
 
   ftime(&time);
   return scm_cons (scm_long2num ((long) time.time), 
-		   SCM_MAKINUM (time.millitm) * 1000);
+		   SCM_MAKINUM (time.millitm * 1000));
 # else
   timet timv;