2008-03-19 22:41:39 -04:00
|
|
|
USING: vocabs.loader sequences system
|
2008-03-19 22:48:29 -04:00
|
|
|
random random.mersenne-twister combinators init
|
2008-03-27 07:36:34 -04:00
|
|
|
namespaces random ;
|
2008-08-29 01:41:26 -04:00
|
|
|
IN: bootstrap.random
|
2008-03-19 17:22:06 -04:00
|
|
|
|
|
|
|
|
"random.mersenne-twister" require
|
|
|
|
|
|
|
|
|
|
{
|
2008-04-02 19:25:33 -04:00
|
|
|
{ [ os windows? ] [ "random.windows" require ] }
|
|
|
|
|
{ [ os unix? ] [ "random.unix" require ] }
|
2008-03-19 17:22:06 -04:00
|
|
|
} cond
|
2008-03-19 22:41:39 -04:00
|
|
|
|
2008-04-11 13:55:57 -04:00
|
|
|
[
|
2008-04-12 22:35:07 -04:00
|
|
|
[ 32 random-bits ] with-system-random
|
2008-04-11 13:55:57 -04:00
|
|
|
<mersenne-twister> random-generator set-global
|
2008-09-18 23:08:12 -04:00
|
|
|
] "bootstrap.random" add-init-hook
|
