aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/metadata
diff options
context:
space:
mode:
authorEduardo Julian2021-09-05 22:52:26 -0400
committerEduardo Julian2021-09-05 22:52:26 -0400
commit132ffdae1add622c8a3c6065d7730a8fe8ea5e78 (patch)
tree540310f190007d192b892db2d0a520d17b73ad48 /stdlib/source/test/aedifex/metadata
parent09e2747bf8c6dcdc1d7318f2490f0de37d77b39f (diff)
Changed the syntax of do/be's (co)monad bindings.
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/aedifex/metadata/artifact.lux2
-rw-r--r--stdlib/source/test/aedifex/metadata/snapshot.lux2
2 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux
index 1d6aae530..544da4d3c 100644
--- a/stdlib/source/test/aedifex/metadata/artifact.lux
+++ b/stdlib/source/test/aedifex/metadata/artifact.lux
@@ -47,7 +47,7 @@
(random.ascii/alpha 5)
(random.ascii/alpha 5)
(random.list 5 (random.ascii/alpha 5))
- (do {! random.monad}
+ (do [! random.monad]
[year (\ ! each (|>> (n.% 9,000) (n.+ 1,000) .int) random.nat)
month (\ ! each (|>> (n.% 12) (n.+ 1)) random.nat)
day_of_month (\ ! each (|>> (n.% 28) (n.+ 1)) random.nat)
diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux
index a8d518aac..2c4866c2c 100644
--- a/stdlib/source/test/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/test/aedifex/metadata/snapshot.lux
@@ -51,7 +51,7 @@
(def: random_instant
(Random Instant)
- (do {! random.monad}
+ (do [! random.monad]
[year (\ ! each (|>> (n.% 9,000) (n.+ 1,000) .int) random.nat)
month (\ ! each (|>> (n.% 12) (n.+ 1)) random.nat)
day_of_month (\ ! each (|>> (n.% 28) (n.+ 1)) random.nat)