--- a/LargeInteger.st	Sat Jan 25 22:04:57 2014 +0100
+++ b/LargeInteger.st	Sat Jan 25 22:21:15 2014 +0100
@@ -1445,7 +1445,7 @@
      Useful for communication protocols"
 
 %{
-    INT swapped;
+    unsigned INT swapped;
 
     swapped = ( (__ByteArrayInstPtr(__INST(digitByteArray))->ba_element[0]) << 24)
               | ((__ByteArrayInstPtr(__INST(digitByteArray))->ba_element[1]) << 16)
@@ -1470,9 +1470,9 @@
      Useful for communication protocols"
 
 %{
-    INT swappedLO = 0;
-    INT swappedHI;
-    INT swapped;
+    unsigned INT swappedLO = 0;
+    unsigned INT swappedHI;
+    unsigned INT swapped;
 
     swappedHI = ((__ByteArrayInstPtr(__INST(digitByteArray))->ba_element[0]) << 24)
               | ((__ByteArrayInstPtr(__INST(digitByteArray))->ba_element[1]) << 16)
@@ -5299,10 +5299,10 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.215 2014-01-25 21:04:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.216 2014-01-25 21:21:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.215 2014-01-25 21:04:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.216 2014-01-25 21:21:15 cg Exp $'
 ! !