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

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

diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux
index 04f4e8e27..d017dd228 100644
--- a/stdlib/source/program/aedifex/command/test.lux
+++ b/stdlib/source/program/aedifex/command/test.lux
@@ -5,7 +5,7 @@
      [monad {"+" [do]}]]
     [control
      [concurrency
-      ["[0]" async {"+" [Async]} ("[1]\[0]" monad)]]]
+      ["[0]" async {"+" [Async]} ("[1]#[0]" monad)]]]
     [math
      [number
       ["i" int]]]
@@ -32,9 +32,9 @@
   (-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit Any]))
   (do async.monad
     [environment (program.environment async.monad program)
-     .let [working_directory (\ program directory)]]
+     .let [working_directory (# program directory)]]
     (do [! ///action.monad]
-      [.let [home (\ program home)]
+      [.let [home (# program home)]
        [build_exit compiler program] (//build.do! console program fs shell resolution
                                                   (with@ ///.#program (value@ ///.#test profile) profile))]
       (if (i.= shell.normal build_exit)
@@ -55,13 +55,13 @@
                                                    [//build.#Python ///.#python]
                                                    [//build.#Lua ///.#lua]
                                                    [//build.#Ruby ///.#ruby]))]
-           process (\ shell execute [environment
+           process (# shell execute [environment
                                      working_directory
                                      test_command
                                      test_parameters])
            _ (//build.log_output! console process)
            _ (//build.log_error! console process)
-           exit (\ process await [])
+           exit (# process await [])
            _ (console.write_line (if (i.= shell.normal exit)
                                    ..success
                                    ..failure)
-- 
cgit v1.2.3