Better names for testing macros (plus better indentation).

9 files changed, 57 insertions, 57 deletions

diff --git a/stdlib/source/test/aedifex/command/auto.lux b/stdlib/source/test/aedifex/command/auto.lux
index 4bc2dec70..7a1e7dc35 100644
--- a/stdlib/source/test/aedifex/command/auto.lux
+++ b/stdlib/source/test/aedifex/command/auto.lux
@@ -91,8 +91,8 @@
          dummy_path (# ! each (|>> (format source /)) (random.alphabetic 5))
          [compiler resolution] $build.resolution]
         (all _.and
-             (_.cover [/.delay]
-                      (n.> 0 /.delay))
+             (_.coverage [/.delay]
+               (n.> 0 /.delay))
              (in (do async.monad
                    [verdict (do ///action.monad
                               [_ (# fs make_directory source)
@@ -120,6 +120,6 @@
                                                              (# ! each (n.= expected_runs)))]
                                 (in {try.#Success (and correct_number_of_runs!
                                                        no_dangling_process!)})))]
-                   (_.cover' [/.do!]
-                             (try.else false verdict))))
+                   (_.coverage' [/.do!]
+                     (try.else false verdict))))
              ))))
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!]
diff --git a/stdlib/source/test/aedifex/command/clean.lux b/stdlib/source/test/aedifex/command/clean.lux
index c64a5e1b7..90dd9c8b9 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -115,5 +115,5 @@
                                   (and sub_exists!/pre
                                        (not sub_exists!/post))
                                   (text#= (/.success target_path) logging))))]
-              (_.cover' [/.do! /.success]
-                        (try.else false verdict)))))))
+              (_.coverage' [/.do! /.success]
+                (try.else false verdict)))))))
diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux
index f414f5d2b..67e1bf702 100644
--- a/stdlib/source/test/aedifex/command/deploy.lux
+++ b/stdlib/source/test/aedifex/command/deploy.lux
@@ -130,5 +130,5 @@
                                   deployed_pom!
                                   deployed_sha-1!
                                   deployed_md5!)))]
-              (_.cover' [/.do! /.success]
-                        (try.else false verdict)))))))
+              (_.coverage' [/.do! /.success]
+                (try.else false verdict)))))))
diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux
index 101eaa542..aeffb80f5 100644
--- a/stdlib/source/test/aedifex/command/deps.lux
+++ b/stdlib/source/test/aedifex/command/deps.lux
@@ -126,5 +126,5 @@
                                   
                                   had_dependee_after!
                                   had_depender_after!)))]
-              (_.cover' [/.do!]
-                        (try.else false verdict)))))))
+              (_.coverage' [/.do!]
+                (try.else false verdict)))))))
diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux
index d89a7a7a6..e0392fd56 100644
--- a/stdlib/source/test/aedifex/command/install.lux
+++ b/stdlib/source/test/aedifex/command/install.lux
@@ -92,14 +92,14 @@
                               (in (and succeeded!
                                        library_exists!
                                        pom_exists!)))]
-                   (_.cover' [/.do! /.success]
-                             (try.else false verdict))))
+                   (_.coverage' [/.do! /.success]
+                     (try.else false verdict))))
              (in (do [! async.monad]
                    [.let [fs (file.mock /)
                           program (program.async (program.mock environment.empty home working_directory))]
                     logging (..execute! program fs (has ///.#identity {.#None} sample))]
-                   (_.cover' [/.failure]
-                             (|> logging
-                                 (try#each (text#= /.failure))
-                                 (try.else false)))))
+                   (_.coverage' [/.failure]
+                     (|> logging
+                         (try#each (text#= /.failure))
+                         (try.else false)))))
              ))))
diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux
index 464189af0..54312e388 100644
--- a/stdlib/source/test/aedifex/command/pom.lux
+++ b/stdlib/source/test/aedifex/command/pom.lux
@@ -57,14 +57,14 @@
                                     (binary#= expected actual)]]
                              (in (and logging!
                                       expected_content!)))]
-                  (_.cover' [/.do! /.success]
-                            (try.else false verdict)))
+                  (_.coverage' [/.do! /.success]
+                    (try.else false verdict)))
                 
                 {try.#Failure error}
-                (_.cover' [/.do!]
-                          (case (the ///.#identity sample)
-                            {.#Some _}
-                            false
+                (_.coverage' [/.do!]
+                  (case (the ///.#identity sample)
+                    {.#Some _}
+                    false
 
-                            {.#None}
-                            true))))))))
+                    {.#None}
+                    true))))))))
diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux
index 862597b79..eec957702 100644
--- a/stdlib/source/test/aedifex/command/test.lux
+++ b/stdlib/source/test/aedifex/command/test.lux
@@ -74,9 +74,9 @@
                                               (text#= //build.success build_end))
                                          (and (text#= /.start test_start)
                                               (text#= /.success test_end)))))]
-                     (_.cover' [/.do!
-                                /.start /.success]
-                               (try.else false verdict)))))
+                     (_.coverage' [/.do!
+                                   /.start /.success]
+                       (try.else false verdict)))))
              (let [fs (file.mock (# file.default separator))
                    console (@version.echo "")]
                (in (do async.monad
@@ -110,6 +110,6 @@
                                               (text#= //build.success build_end))
                                          (and (text#= /.start test_start)
                                               (text#= /.failure test_end)))))]
-                     (_.cover' [/.failure]
-                               (try.else false verdict)))))
+                     (_.coverage' [/.failure]
+                       (try.else false verdict)))))
              ))))
diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux
index fff234d52..5a0fbf681 100644
--- a/stdlib/source/test/aedifex/command/version.lux
+++ b/stdlib/source/test/aedifex/command/version.lux
@@ -74,5 +74,5 @@
                           logging (# console read_line [])]
                          (in (text#= (version.format lux_version.latest)
                                      logging)))]
-              (_.cover' [/.do!]
-                        (try.else false verdict)))))))
+              (_.coverage' [/.do!]
+                (try.else false verdict)))))))