--- a/RegressionTests__IntegerTest.st Wed Mar 23 18:36:14 2016 +0100
+++ b/RegressionTests__IntegerTest.st Wed Mar 23 18:37:59 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"{ Package: 'exept:regression' }"
"{ NameSpace: RegressionTests }"
@@ -1255,7 +1253,7 @@
16r00FFFFFFFFFFFFFFFF
16rFFFFFFFFFFFFFFFFFF
) do:[:m |
- Transcript showCR:m.
+ "/ Transcript showCR:m.
nr := 1.
1 to:100 do:[:n |
nr := nr * m
@@ -1263,7 +1261,7 @@
1 to:100 do:[:n |
nr := nr / m
].
- self assert:(nr == 1).
+ self assert:(nr == 1) description:('failed in division of ',m printString).
].
"