Index: mpi-1.8.6/mpi.c
===================================================================
--- mpi-1.8.6.orig/mpi.c	2011-12-09 21:11:31.000000000 -0800
+++ mpi-1.8.6/mpi.c	2011-12-09 21:12:09.000000000 -0800
@@ -3272,7 +3272,7 @@
   }
 
   for(ix = 0; ix < max; ix++) {
-    w = (dp[ix] * d) + k;
+    w = (dp[ix] * (mp_word) d) + k;
     dp[ix] = ACCUM(w);
     k = CARRYOUT(w);
   }