From 132ffdae1add622c8a3c6065d7730a8fe8ea5e78 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 5 Sep 2021 22:52:26 -0400
Subject: Changed the syntax of do/be's (co)monad bindings.

---
 stdlib/source/test/lux.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'stdlib/source/test/lux.lux')

diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 25e19caa8..9e353a1c3 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -478,7 +478,7 @@
 
 (def: for_type
   Test
-  (do {! random.monad}
+  (do [! random.monad]
     [expected random.nat
 
      expected_left random.nat
@@ -631,7 +631,7 @@
             (_.cover [/.template:]
                      (n.= (n.+ left right)
                           (!n/+ left right))))
-          (do {! random.monad}
+          (do [! random.monad]
             [sample (\ ! each (n.% 5) random.nat)]
             (_.cover [/.^template]
                      (case sample
@@ -912,7 +912,7 @@
 
 (def: for_case
   Test
-  (do {! random.monad}
+  (do [! random.monad]
     [expected_nat (\ ! each (n.% 1) random.nat)
      expected_int (\ ! each (i.% +1) random.int)
      expected_rev (random.either (in .5)
-- 
cgit v1.2.3