fix from the net for sign extension problem
authorSam Leffler <sam@ucbvax.Berkeley.EDU>
Fri, 5 Aug 1983 10:49:01 +0000 (02:49 -0800)
committerSam Leffler <sam@ucbvax.Berkeley.EDU>
Fri, 5 Aug 1983 10:49:01 +0000 (02:49 -0800)
SCCS-vsn: lib/libmp/mdiv.c 4.2

usr/src/lib/libmp/mdiv.c

index 3d90b45..a93ea06 100644 (file)
@@ -1,4 +1,4 @@
-/*     @(#)mdiv.c      4.1     %G%     */
+/*     @(#)mdiv.c      4.2     %G%     */
 
 #include <mp.h>
 mdiv(a,b,q,r) MINT *a,*b,*q,*r;
 
 #include <mp.h>
 mdiv(a,b,q,r) MINT *a,*b,*q,*r;
@@ -22,7 +22,8 @@ mdiv(a,b,q,r) MINT *a,*b,*q,*r;
 }
 m_dsb(q,n,a,b) short *a,*b;
 {      long int x,qx;
 }
 m_dsb(q,n,a,b) short *a,*b;
 {      long int x,qx;
-       int borrow,j,u;
+       int borrow,j;
+       short u;
        qx=q;
        borrow=0;
        for(j=0;j<n;j++)
        qx=q;
        borrow=0;
        for(j=0;j<n;j++)