#DOCUMENTATION by stefan
authorStefan Vogel <sv@exept.de>
Thu, 28 Mar 2019 09:36:10 +0100
changeset 2191 bdd8c7dd8ffe
parent 2190 df0e2fac468d
child 2192 b0aedc917f4e
#DOCUMENTATION by stefan class: RegressionTests::IntegerTest changed: #testBitReversed
RegressionTests__IntegerTest.st
--- 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'!