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/aedifex/cache.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux
index 748af575a..7bd36499b 100644
--- a/stdlib/source/test/aedifex/cache.lux
+++ b/stdlib/source/test/aedifex/cache.lux
@@ -63,13 +63,13 @@
 
 (def: content
   (Random Binary)
-  (do {! random.monad}
+  (do [! random.monad]
     [content_size (\ ! each (n.% 100) random.nat)]
     (_binary.random content_size)))
 
 (def: package
   (Random [Dependency Package])
-  (do {! random.monad}
+  (do [! random.monad]
     [[identity profile pom] ..profile
      type ..type
      content ..content]
@@ -79,7 +79,7 @@
 
 (def: resolution
   (Random Resolution)
-  (do {! random.monad}
+  (do [! random.monad]
     [[main_dependency main_package] ..package
      dependencies (|> (//package.dependencies main_package)
                       (\ try.monad each set.list)
@@ -100,7 +100,7 @@
 
 (def: singular
   Test
-  (do {! random.monad}
+  (do [! random.monad]
     [[dependency expected_package] ..package
      home (random.ascii/alpha 5)
      working_directory (random.ascii/alpha 5)
@@ -121,7 +121,7 @@
 
 (def: plural
   Test
-  (do {! random.monad}
+  (do [! random.monad]
     [expected ..resolution
      home (random.ascii/alpha 5)
      working_directory (random.ascii/alpha 5)
-- 
cgit v1.2.3