From 2dbbaaec93a53f8dd0b96a0028b9cf125c9066cd Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 15:39:55 -0400
Subject: Re-named \ => # && \\ => ##

---
 stdlib/source/test/aedifex/command/build.lux | 38 ++++++++++++++--------------
 1 file changed, 19 insertions(+), 19 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/command/build.lux b/stdlib/source/test/aedifex/command/build.lux
index ee69f1010..722478571 100644
--- a/stdlib/source/test/aedifex/command/build.lux
+++ b/stdlib/source/test/aedifex/command/build.lux
@@ -14,7 +14,7 @@
      [parser
       ["[0]" environment]]]
     [data
-     ["[0]" text ("[1]\[0]" equivalence)]
+     ["[0]" text ("[1]#[0]" equivalence)]
      [collection
       ["[0]" dictionary]]]
     [math
@@ -142,14 +142,14 @@
       (do [! random.monad]
         [last_read (random.ascii/alpha 5)
          last_error (random.ascii/alpha 5)
-         .let [fs (file.mock (\ file.default separator))
+         .let [fs (file.mock (# file.default separator))
                shell (shell.async (..good_shell []))]
          program (random.ascii/alpha 5)
          target (random.ascii/alpha 5)
          home (random.ascii/alpha 5)
          working_directory (random.ascii/alpha 5)
          .let [empty_profile (: Profile
-                                (\ ///.monoid identity))
+                                (# ///.monoid identity))
                with_target (: (-> Profile Profile)
                               (with@ ///.#target target))
                with_program (: (-> Profile Profile)
@@ -186,10 +186,10 @@
                                [_ (/.do! console (program.async (program.mock environment.empty home working_directory))
                                          fs shell resolution
                                          (with@ ///.#compiler compiler profile))
-                                start (\ console read_line [])
-                                end (\ console read_line [])]
-                               (in (and (text\= /.start start)
-                                        (text\= /.success end))))]
+                                start (# console read_line [])
+                                end (# console read_line [])]
+                               (in (and (text#= /.start start)
+                                        (text#= /.success end))))]
                     (_.cover' [/.do!
                                /.lux_group
                                /.jvm_compiler_name
@@ -208,10 +208,10 @@
                                [_ (/.do! console (program.async (program.mock environment.empty home working_directory))
                                          fs (shell.async (..bad_shell [])) resolution
                                          (with@ ///.#compiler compiler profile))
-                                start (\ console read_line [])
-                                end (\ console read_line [])]
-                               (in (and (text\= /.start start)
-                                        (text\= /.failure end))))]
+                                start (# console read_line [])
+                                end (# console read_line [])]
+                               (in (and (text#= /.start start)
+                                        (text#= /.failure end))))]
                     (_.cover' [/.failure]
                               (try.else false verdict)))))
             (do !
@@ -228,19 +228,19 @@
                                      [verdict (do ///action.monad
                                                 [process (shell [environment.empty working_directory "" (list "")])
                                                  _ (<log!> console process)
-                                                 actual/0 (\ console read_line [])
-                                                 actual/1 (\ console read_line [])
-                                                 actual/2 (\ console read_line [])
-                                                 end! (|> (\ console read_line [])
-                                                          (\ ! each (|>> (case> {try.#Failure error}
+                                                 actual/0 (# console read_line [])
+                                                 actual/1 (# console read_line [])
+                                                 actual/2 (# console read_line [])
+                                                 end! (|> (# console read_line [])
+                                                          (# ! each (|>> (case> {try.#Failure error}
                                                                                 true
                                                                                 
                                                                                 {try.#Success _}
                                                                                 false)
                                                                          {try.#Success})))]
-                                                (in (and (text\= expected/0 actual/0)
-                                                         (text\= expected/1 actual/1)
-                                                         (text\= expected/2 actual/2)
+                                                (in (and (text#= expected/0 actual/0)
+                                                         (text#= expected/1 actual/1)
+                                                         (text#= expected/2 actual/2)
                                                          end!)))]
                                      (_.cover' [<log!>]
                                                (try.else false verdict)))))]
-- 
cgit v1.2.3