aboutsummaryrefslogtreecommitdiff
path: root/licentia/source/test
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--licentia/source/test/licentia.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/licentia/source/test/licentia.lux b/licentia/source/test/licentia.lux
index e3204e598..8f967502a 100644
--- a/licentia/source/test/licentia.lux
+++ b/licentia/source/test/licentia.lux
@@ -46,7 +46,7 @@
(def: period
(Random (Period Nat))
- (do {! random.monad}
+ (do [! random.monad]
[start (random.filter (|>> (n.= n\top) not)
random.nat)
#let [wiggle_room (n.- start n\top)]
@@ -108,7 +108,7 @@
(def: (variable_list max_size gen_element)
(All (_ a) (-> Nat (Random a) (Random (List a))))
- (do {! random.monad}
+ (do [! random.monad]
[amount (\ ! each (n.% (n.max 1 max_size))
random.nat)]
(random.list amount gen_element)))