aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/data/collection/tree.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/lux/data/collection/tree.lux')
-rw-r--r--stdlib/source/test/lux/data/collection/tree.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/test/lux/data/collection/tree.lux b/stdlib/source/test/lux/data/collection/tree.lux
index 66607cc37..0aba27125 100644
--- a/stdlib/source/test/lux/data/collection/tree.lux
+++ b/stdlib/source/test/lux/data/collection/tree.lux
@@ -21,7 +21,7 @@
(def: .public (tree gen_value)
(All (_ a) (-> (Random a) (Random [Nat (Tree a)])))
- (do {! random.monad}
+ (do [! random.monad]
[value gen_value
num_children (\ ! each (n.% 2) random.nat)
children (random.list num_children (tree gen_value))]
@@ -56,7 +56,7 @@
(\ (list.equivalence n.equivalence) =
(list expected)
(/.flat (/.leaf expected)))))
- (do {! random.monad}
+ (do [! random.monad]
[value random.nat
num_children (\ ! each (n.% 3) random.nat)
children (random.list num_children random.nat)]