basis/random/random-tests.factor

   1 USING: random sequences tools.test ;
   2 IN: random.tests
   3
   4 [ 4 ] [ 4 random-bytes length ] unit-test
   5 [ 7 ] [ 7 random-bytes length ] unit-test
   6
   7 [ 4 ] [ [ 4 random-bytes length ] with-secure-random ] unit-test
   8 [ 7 ] [ [ 7 random-bytes length ] with-secure-random ] unit-test