]> gitweb.factorcode.org Git - factor.git/blob - basis/random/dummy/dummy-tests.factor
factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test
[factor.git] / basis / random / dummy / dummy-tests.factor
1 ! Copyright (C) 2009 Doug Coleman.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: random random.dummy tools.test ;
4 IN: random.dummy.tests
5
6 { 10 } [ 10 <random-dummy> random-32* ] unit-test
7 { 100 } [ 10 <random-dummy> 100 seed-random random-32* ] unit-test