RegressionTests__IntegerTest.st
changeset 1029 daa98cf43cf0
parent 1028 717c303547ca
child 1030 2115331b1845
--- a/RegressionTests__IntegerTest.st	Mon Dec 02 17:36:34 2013 +0100
+++ b/RegressionTests__IntegerTest.st	Mon Dec 02 17:37:21 2013 +0100
@@ -2471,19 +2471,19 @@
     t2 := LargeInteger digitBytes:#[ 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 0 0].
     r := t1 absMul:t2.                        
     self assert:(r printString = '5192296858534809181504947642957825').
-    self assert:(r hexPrintString = 'FFFF00000000FFFEFF0000000001').
+    self assert:(r hexPrintString = 'FFFFFFFFFFFEFFFF000000000001').
 
     t1 := LargeInteger digitBytes:#[ 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF].
     t2 := LargeInteger digitBytes:#[ 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 16rFF 0].
     r := t1 absMul:t2.
     self assert:(r printString = '1329227995784915854385005392532865025').
-    self assert:(r hexPrintString = 'FFFFFFFFFFFEFFFF000000000001').
+    self assert:(r hexPrintString = 'FFFFFFFFFFFFFEFF00000000000001').
 
     "
      self basicNew testLargeMultiplicationHelpers1
     "
 
-    "Modified: / 02-12-2013 / 17:23:16 / cg"
+    "Modified: / 02-12-2013 / 17:37:09 / cg"
 !
 
 testLargeMultiplicationHelpers2