aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/command/auto.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-08-24 05:23:45 -0400
committerEduardo Julian2021-08-24 05:23:45 -0400
commit36303d6cb2ce3ab9e36d045b9516c997bd461862 (patch)
treeb9d2f1495143054d61d9af129f36833624db9dac /stdlib/source/test/aedifex/command/auto.lux
parentec1f31b5a1492d5e0ab260397291d4449483bbd9 (diff)
Outsourced the syntax for labelled type definitions to macros.
Diffstat (limited to 'stdlib/source/test/aedifex/command/auto.lux')
-rw-r--r--stdlib/source/test/aedifex/command/auto.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/test/aedifex/command/auto.lux b/stdlib/source/test/aedifex/command/auto.lux
index 1ed19ddf7..91506ca06 100644
--- a/stdlib/source/test/aedifex/command/auto.lux
+++ b/stdlib/source/test/aedifex/command/auto.lux
@@ -89,8 +89,8 @@
home (random.ascii/alpha 5)
working_directory (random.ascii/alpha 5)
- expected_runs (\ ! map (|>> (n.% 10) (n.max 2)) random.nat)
- dummy_path (\ ! map (|>> (format source /)) (random.ascii/alpha 5))
+ expected_runs (\ ! each (|>> (n.% 10) (n.max 2)) random.nat)
+ dummy_path (\ ! each (|>> (format source /)) (random.ascii/alpha 5))
[compiler resolution] $build.resolution]
($_ _.and
(_.cover [/.delay]
@@ -110,15 +110,15 @@
fs
(shell.async ($build.good_shell []))
resolution)
- (\ ! map (|>> (case> (#try.Failure error)
- (same? end_signal error)
+ (\ ! each (|>> (case> (#try.Failure error)
+ (same? end_signal error)
- (#try.Success _)
- false))))
+ (#try.Success _)
+ false))))
correct_number_of_runs! (|> @runs
atom.read!
async.future
- (\ ! map (n.= expected_runs)))]
+ (\ ! each (n.= expected_runs)))]
(in (#try.Success (and correct_number_of_runs!
no_dangling_process!)))))]
(_.cover' [/.do!]