aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/command
diff options
context:
space:
mode:
authorEduardo Julian2021-08-09 23:02:01 -0400
committerEduardo Julian2021-08-09 23:02:01 -0400
commit464b6e8f5e6c62f58fa8c7ff61ab2ad215e98bd1 (patch)
tree1ae9d95956cee4251cd29a3e24c246c4360d567d /stdlib/source/test/aedifex/command
parentf621a133e6e0a516c0586270fea8eaffb4829d82 (diff)
Improved single-line comment syntax (from "##" to "...").
Diffstat (limited to 'stdlib/source/test/aedifex/command')
-rw-r--r--stdlib/source/test/aedifex/command/auto.lux4
-rw-r--r--stdlib/source/test/aedifex/command/install.lux4
2 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/aedifex/command/auto.lux b/stdlib/source/test/aedifex/command/auto.lux
index 6a7ef98ab..074eeab5e 100644
--- a/stdlib/source/test/aedifex/command/auto.lux
+++ b/stdlib/source/test/aedifex/command/auto.lux
@@ -53,7 +53,7 @@
[@runs
(function (_ console program fs shell resolution profile)
(do {! async.monad}
- [[_ actual_runs] (async.future (atom.update inc @runs))]
+ [[_ actual_runs] (async.future (atom.update! inc @runs))]
(if (n.= expected_runs actual_runs)
(in (#try.Failure end_signal))
(do (try.with !)
@@ -116,7 +116,7 @@
(#try.Success _)
false))))
correct_number_of_runs! (|> @runs
- atom.read
+ atom.read!
async.future
(\ ! map (n.= expected_runs)))]
(in (#try.Success (and correct_number_of_runs!
diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux
index 0ca484196..a3cd99edd 100644
--- a/stdlib/source/test/aedifex/command/install.lux
+++ b/stdlib/source/test/aedifex/command/install.lux
@@ -84,11 +84,11 @@
library_exists! (|> library_path
(format home /)
(\ fs file?)
- (\ async.monad map exception.return))
+ (\ async.monad map (|>> #try.Success)))
pom_exists! (|> pom_path
(format home /)
(\ fs file?)
- (\ async.monad map exception.return))]
+ (\ async.monad map (|>> #try.Success)))]
(in (and succeeded!
library_exists!
pom_exists!)))]