--- a/RegressionTests__IntegerTest.st	Thu Mar 28 00:20:16 2019 +0100
+++ b/RegressionTests__IntegerTest.st	Thu Mar 28 09:36:10 2019 +0100
@@ -5245,10 +5245,10 @@
         self assert:(in bitReversed16 == expected)
     ].
 
-    0 to:1000 do:[:n |
+    0 to:64 do:[:n |
         |nr|
         
-        nr := (1 bitShift:n).
+        nr := 1 bitShift:n.
         n < 16 ifTrue:[
             self assert:((nr bitReversed16) bitReversed16) = nr.
         ].    
@@ -5300,6 +5300,7 @@
 
     "Created: / 24-03-2019 / 11:36:18 / Claus Gittinger"
     "Modified: / 27-03-2019 / 18:29:33 / Claus Gittinger"
+    "Modified: / 27-03-2019 / 15:16:43 / stefan"
 ! !
 
 !IntegerTest methodsFor:'tests-class protocol'!