From 04c7f49a732380a2b9f72b1b937171b341c24323 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 9 Apr 2022 03:03:46 -0400
Subject: Better names for testing macros (plus better indentation).

---
 stdlib/source/test/aedifex/command/build.lux | 52 ++++++++++++++--------------
 1 file changed, 26 insertions(+), 26 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 008908479..4d813a8ad 100644
--- a/stdlib/source/test/aedifex/command/build.lux
+++ b/stdlib/source/test/aedifex/command/build.lux
@@ -162,22 +162,22 @@
              (in (do async.monad
                    [outcome (/.do! (@version.echo "") (program.async (program.mock environment.empty home working_directory)) fs shell ///dependency/resolution.empty
                                    (with_target empty_profile))]
-                   (_.cover' [/.no_specified_program]
-                             (case outcome
-                               {try.#Success _}
-                               false
+                   (_.coverage' [/.no_specified_program]
+                     (case outcome
+                       {try.#Success _}
+                       false
 
-                               {try.#Failure error}
-                               (exception.match? /.no_specified_program error)))))
+                       {try.#Failure error}
+                       (exception.match? /.no_specified_program error)))))
              (in (do async.monad
                    [outcome (/.do! (@version.echo "") (program.async (program.mock environment.empty home working_directory)) fs shell ///dependency/resolution.empty profile)]
-                   (_.cover' [/.Lux /.no_available_lux]
-                             (case outcome
-                               {try.#Success _}
-                               false
+                   (_.coverage' [/.Lux /.no_available_lux]
+                     (case outcome
+                       {try.#Success _}
+                       false
 
-                               {try.#Failure error}
-                               (exception.match? /.no_available_lux error)))))
+                       {try.#Failure error}
+                       (exception.match? /.no_available_lux error)))))
              (do !
                [.let [console (@version.echo "")]
                 [compiler resolution] ..resolution]
@@ -190,16 +190,16 @@
                                  end (# console read_line [])]
                                 (in (and (text#= /.start start)
                                          (text#= /.success end))))]
-                     (_.cover' [/.do!
-                                /.lux_group
-                                /.jvm_lux_name
-                                /.js_lux_name
-                                /.python_lux_name
-                                /.lua_lux_name
-                                /.ruby_lux_name
-                                /.start
-                                /.success]
-                               (try.else false verdict)))))
+                     (_.coverage' [/.do!
+                                   /.lux_group
+                                   /.jvm_lux_name
+                                   /.js_lux_name
+                                   /.python_lux_name
+                                   /.lua_lux_name
+                                   /.ruby_lux_name
+                                   /.start
+                                   /.success]
+                       (try.else false verdict)))))
              (do !
                [.let [console (@version.echo "")]
                 [compiler resolution] ..resolution]
@@ -212,8 +212,8 @@
                                  end (# console read_line [])]
                                 (in (and (text#= /.start start)
                                          (text#= /.failure end))))]
-                     (_.cover' [/.failure]
-                               (try.else false verdict)))))
+                     (_.coverage' [/.failure]
+                       (try.else false verdict)))))
              (do !
                [expected/0 (random.alphabetic 5)
                 expected/1 (random.alphabetic 5)
@@ -243,8 +243,8 @@
                                                            (text#= expected/1 actual/1)
                                                            (text#= expected/2 actual/2)
                                                            end!)))]
-                                       (_.cover' [<log!>]
-                                                 (try.else false verdict)))))]
+                                       (_.coverage' [<log!>]
+                                         (try.else false verdict)))))]
 
                               [#0 /.log_output!]
                               [#1 /.log_error!]
-- 
cgit v1.2.3