From 17e7566be51df5e428a6b10e6469201a8a9468da Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 7 Aug 2021 02:20:09 -0400
Subject: Made the be/de macros for (co)monadic expression extensible.

---
 stdlib/source/test/aedifex/dependency/resolution.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux
index fa0391761..89e16691d 100644
--- a/stdlib/source/test/aedifex/dependency/resolution.lux
+++ b/stdlib/source/test/aedifex/dependency/resolution.lux
@@ -254,7 +254,7 @@
                                          (\ ///package.equivalence = expected_package)
                                          not)
                                     $///package.random)
-     #let [good (..single expected_artifact expected_package)
+     .let [good (..single expected_artifact expected_package)
            bad_sha-1 (..bad_sha-1 expected_artifact expected_package dummy_package)
            bad_md5 (..bad_md5 expected_artifact expected_package dummy_package)]]
     (`` ($_ _.and
@@ -299,12 +299,12 @@
                                          (\ ///package.equivalence = expected_package)
                                          not)
                                     $///package.random)
-     #let [good (..single expected_artifact expected_package)
+     .let [good (..single expected_artifact expected_package)
            bad_sha-1 (..bad_sha-1 expected_artifact expected_package dummy_package)
            bad_md5 (..bad_md5 expected_artifact expected_package dummy_package)]]
     ($_ _.and
         (in (do async.monad
-              [#let [console ($///version.echo "")]
+              [.let [console ($///version.echo "")]
                actual_package (/.any console
                                      (list (///repository.mock bad_sha-1 [])
                                            (///repository.mock bad_md5 [])
@@ -321,7 +321,7 @@
                           (#try.Failure _)
                           false))))
         (in (do async.monad
-              [#let [console ($///version.echo "")]
+              [.let [console ($///version.echo "")]
                actual_package (/.any console
                                      (list (///repository.mock bad_sha-1 [])
                                            (///repository.mock bad_md5 []))
@@ -358,7 +358,7 @@
      [_ depender_package] $///package.random
      [_ ignored_package] $///package.random
 
-     #let [dependee {#///dependency.artifact dependee_artifact
+     .let [dependee {#///dependency.artifact dependee_artifact
                      #///dependency.type ///artifact/type.lux_library}
            depender {#///dependency.artifact depender_artifact
                      #///dependency.type ///artifact/type.lux_library}
@@ -407,7 +407,7 @@
      (..packages [dependee_artifact depender_artifact ignored_artifact])]
     ($_ _.and
         (in (do async.monad
-              [#let [console ($///version.echo "")]
+              [.let [console ($///version.echo "")]
                [successes failures resolution] (/.all console
                                                       (list (///repository.mock (..single dependee_artifact dependee_package) [])
                                                             (///repository.mock (..single depender_artifact depender_package) [])
-- 
cgit v1.2.3