diff --git a/Objects/longobject.c b/Objects/longobject.c
index 856230e..9e641af 100644
--- a/Objects/longobject.c
+++ b/Objects/longobject.c
@@ -949,7 +949,7 @@
 			++basebits;
 
 		for (i = 0; i < size_a; ++i) {
-			accum |= a->ob_digit[i] << accumbits;
+			accum |= (twodigits)a->ob_digit[i] << accumbits;
 			accumbits += SHIFT;
 			assert(accumbits >= basebits);
 			do {
@@ -2345,7 +2345,7 @@
 		z->ob_digit[i] = 0;
 	accum = 0;
 	for (i = wordshift, j = 0; j < oldsize; i++, j++) {
-		accum |= a->ob_digit[j] << remshift;
+		accum |= (twodigits)a->ob_digit[j] << remshift;
 		z->ob_digit[i] = (digit)(accum & MASK);
 		accum >>= SHIFT;
 	}