LargeInteger.st
changeset 5002 e895e251d501
parent 5000 46a73184be0d
child 5008 1a19e0059c54
--- a/LargeInteger.st	Thu Nov 18 16:22:12 1999 +0100
+++ b/LargeInteger.st	Thu Nov 18 17:10:32 1999 +0100
@@ -3389,7 +3389,7 @@
 #if defined(__LSB_FIRST) || defined(i386) || defined(alpha)
                     unsigned INT _sum = *(unsigned INT *)_otherDigits + *(unsigned INT *)_myDigits;
 #else
-                    unsigned INT _sum = __longIntVal(self) + __longIntVal(aLargeInteger);
+                    unsigned INT _sum = __unsignedLongIntVal(self) + __unsignedLongIntVal(aLargeInteger);
 #endif /* not LSB_FIRST */
                     _uint = __MKUINT(_sum);
                     if (!__isSmallInteger(_uint))
@@ -4285,5 +4285,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.147 1999-11-18 14:58:03 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.148 1999-11-18 16:10:32 stefan Exp $'
 ! !