LargeInteger.st
changeset 4179 1c32c8c8dfd0
parent 4178 e7121285caa8
child 4180 cdfbc649b10d
--- a/LargeInteger.st	Wed May 12 09:04:22 1999 +0200
+++ b/LargeInteger.st	Wed May 12 09:21:42 1999 +0200
@@ -1607,7 +1607,7 @@
 	 * remaining carry
 	 */
 	while (_carry) {
-	    *resultP++ = _carry & 0xFF;
+	    *resultP++ = _carry /* & 0xFF */;
 	    _carry >>= 8;
 	    _l--;
 	}
@@ -1856,8 +1856,8 @@
 # ifdef i386 /* LSB_FIRST */
 		    *((unsigned short *)(&resultBytes[index])) = (div & 0xFFFF);
 # else
-		    resultBytes[index+1] = (div >> 8);
-		    resultBytes[index] = (div & 0xFF);
+		    resultBytes[index+1] = div >> 8;
+		    resultBytes[index] = div /* & 0xFF */;
 # endif
 		}
 	    }
@@ -2468,14 +2468,14 @@
 	    /* loop over shorts of f2 */
 	    while (_p2 < _p2Last) {
 		_v = (short1 * ((unsigned short *)_p2)[0]) + ((unsigned short *)_pResult)[0];
-		((unsigned short *)_pResult)[0] = _v & 0xFFFF;
+		((unsigned short *)_pResult)[0] = _v /* & 0xFFFF */;
 		_v >>= 16; /* now _v contains the carry*/
 		_pResult += 2;                
 		if (_v) {
 		    /* distribute carry */
 		    for (_pResult1 = _pResult; _v; _pResult1++) {
 			_v += _pResult1[0];
-			_pResult1[0] = _v & 0xFF;
+			_pResult1[0] = _v /* & 0xFF */;
 			_v >>= 8;
 		    }
 		}
@@ -2485,14 +2485,14 @@
 	    /* possible odd highByte of f2 */
 	    if (_p2 <= _p2Last) {
 		_v = (short1 * _p2[0]) + ((unsigned short *)_pResult)[0];
-		((unsigned short *)_pResult)[0] = _v & 0xFFFF;
+		((unsigned short *)_pResult)[0] = _v /* & 0xFFFF */;
 		_v >>= 16; /* now _v contains the carry*/
 		_pResult += 2;                
 		if (_v) {
 		    /* distribute carry */
 		    for (_pResult1 = _pResult; _v; _pResult1++) {
 			_v += _pResult1[0];
-			_pResult1[0] = _v & 0xFF;
+			_pResult1[0] = _v /* & 0xFF */;
 			_v >>= 8;
 		    }
 		}
@@ -2512,14 +2512,14 @@
 	    /* loop over shorts of f2 */
 	    while (_p2 < _p2Last) {
 		_v = (byte1 * ((unsigned short *)_p2)[0]) + ((unsigned short *)_pResult)[0];
-		((unsigned short *)_pResult)[0] = _v & 0xFFFF;
+		((unsigned short *)_pResult)[0] = _v /* & 0xFFFF */;
 		_v >>= 16; /* now _v contains the carry*/
 		_pResult += 2;                
 		if (_v) {
 		    /* distribute carry */
 		    for (_pResult1 = _pResult; _v; _pResult1++) {
 			_v += _pResult1[0];
-			_pResult1[0] = _v & 0xFF;
+			_pResult1[0] = _v /* & 0xFF */;
 			_v >>= 8;
 		    }
 		}
@@ -2530,14 +2530,14 @@
 	    /* possible odd highByte of f2 (or byteLoop, if not LSBFIRST) */
 	    while (_p2 <= _p2Last) {
 		_v = (byte1 * _p2[0]) + _pResult[0];
-		_pResult[0] = _v & 0xFF;
+		_pResult[0] = _v /* & 0xFF */;
 		_v >>= 8; /* now _v contains the carry*/
 		_pResult++;                
 		if (_v) {
 		    /* distribute carry */
 		    for (_pResult1 = _pResult; _v; _pResult1++) {
 			_v += _pResult1[0];
-			_pResult1[0] = _v & 0xFF;
+			_pResult1[0] = _v /* & 0xFF */;
 			_v >>= 8;
 		    }
 		}
@@ -3110,5 +3110,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.89 1999-05-12 07:04:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.90 1999-05-12 07:21:42 cg Exp $'
 ! !