# HG changeset patch # User Claus Gittinger # Date 1412266999 -7200 # Node ID 2568713fddf8be53cfa02cc4b3d872998ebd6bcf # Parent a71369580f84321c44d04bec5accbe0632dd6d0b comments diff -r a71369580f84 -r 2568713fddf8 RandomMT19937.st --- a/RandomMT19937.st Thu Oct 02 18:23:16 2014 +0200 +++ b/RandomMT19937.st Thu Oct 02 18:23:19 2014 +0200 @@ -357,7 +357,7 @@ !RandomMT19937 methodsFor:'random numbers'! nextBoolean - "generates the next integer in 0..FFFFFFFF" + "generates a boolean random" ^ self nextInteger > 16r7FFFFFFF ! @@ -411,10 +411,10 @@ !RandomMT19937 class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.6 2014-10-02 14:31:02 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.7 2014-10-02 16:23:19 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.6 2014-10-02 14:31:02 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic2/RandomMT19937.st,v 1.7 2014-10-02 16:23:19 cg Exp $' ! !