crontab: add tests for random

diff --git a/extra/crontab/crontab-tests.factor b/extra/crontab/crontab-tests.factor
index f7173509694664e5abaff332b13e0f17ceded5b5..131d18a4f90405f601879de3a1987bbf11718c41 100644 (file)
--- a/extra/crontab/crontab-tests.factor
+++ b/extra/crontab/crontab-tests.factor
@@ -1,5 +1,5 @@
 USING: calendar calendar.format crontab kernel math.order
-sequences tools.test ;
+namespaces random random.mersenne-twister sequences tools.test ;
 
 IN: crontab.tests
 
@@ -220,3 +220,18 @@ CONSTANT: start-timestamp T{ timestamp
         "Sun, 24 Mar 2019 04:54:00 -0700"
     }
 } [ "50- 4 * * *" next-few-times ] unit-test
+
+! A random minute of every 04:00 hour
+{
+    {
+        "Sun, 24 Mar 2019 04:32:00 -0700"
+        "Mon, 25 Mar 2019 04:32:00 -0700"
+        "Tue, 26 Mar 2019 04:32:00 -0700"
+        "Wed, 27 Mar 2019 04:32:00 -0700"
+        "Thu, 28 Mar 2019 04:32:00 -0700"
+    }
+} [
+    100 <mersenne-twister> [
+        "~ 4 * * *" next-few-times
+    ] with-random
+] unit-test