X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/ce76ff166af224efbeadc7beaa6fdfd4b222c63b..c760149fcb65296defd1af967fbfa098bd83143a:/mpx.c

diff --git a/mpx.c b/mpx.c
index 7f0b25a..327699c 100644
--- a/mpx.c
+++ b/mpx.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: mpx.c,v 1.8 2000/06/25 12:59:02 mdw Exp $
+ * $Id: mpx.c,v 1.9 2000/06/26 07:52:50 mdw Exp $
  *
  * Low-level multiprecision arithmetic
  *
@@ -30,6 +30,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: mpx.c,v $
+ * Revision 1.9  2000/06/26 07:52:50  mdw
+ * Portability fix for the bug fix.
+ *
  * Revision 1.8  2000/06/25 12:59:02  mdw
  * (mpx_udiv): Fix bug in quotient digit estimation.
  *
@@ -839,7 +842,7 @@ void mpx_udiv(mpw *qv, mpw *qvl, mpw *rv, mpw *rvl,
 	  yh -= d;
 	  if (yl < dd)
 	    yh--;
-	  yl -= dd;
+	  yl = MPW(yl - dd);
 	}
       }