RandomMT19937.st
changeset 3430 9f50ed777fd0
parent 3429 518a0ac18836
child 4591 2449ca90c3a9
--- a/RandomMT19937.st	Thu Oct 02 18:29:42 2014 +0200
+++ b/RandomMT19937.st	Thu Oct 02 18:31:10 2014 +0200
@@ -330,9 +330,7 @@
     [mti < n] whileTrue:[
         |t|
 
-        t := (1812433253
-                * ((mt at:(mti)) bitXor:((mt at:(mti)) >> 30)))
-             + mti.
+        t := (1812433253 * ((mt at:(mti)) bitXor:((mt at:(mti)) >> 30))) + mti.
 
         mt at:(mti+1) put:(t bitAnd:16rFFFFFFFF).
         mti := mti + 1.
@@ -411,10 +409,10 @@
 !RandomMT19937 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.8 2014-10-02 16:29:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.9 2014-10-02 16:31:10 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.8 2014-10-02 16:29:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.9 2014-10-02 16:31:10 cg Exp $'
 ! !