From a4b64bf1cdf47160b6b615d2c6493039abfd7a94 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 28 Jul 2022 17:39:01 -0400
Subject: Extracted unit-testing machinery into its own module.

---
 stdlib/source/specification/aedifex/repository.lux | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'stdlib/source/specification/aedifex/repository.lux')

diff --git a/stdlib/source/specification/aedifex/repository.lux b/stdlib/source/specification/aedifex/repository.lux
index 9cc2e0f2d..a0812b443 100644
--- a/stdlib/source/specification/aedifex/repository.lux
+++ b/stdlib/source/specification/aedifex/repository.lux
@@ -1,7 +1,6 @@
 (.require
  [library
   [lux (.except)
-   ["_" test (.only Test)]
    [abstract
     [monad (.only do)]]
    [control
@@ -12,7 +11,9 @@
     ["[0]" binary (.only)
      ["_[1]" \\test]]]
    [math
-    ["[0]" random]]]]
+    ["[0]" random]]
+   ["_" test (.only Test)
+    ["[0]" unit]]]]
  [\\program
   ["[0]" / (.only)
    ["[1][0]" remote]
@@ -27,7 +28,7 @@
   (-> Artifact Artifact (/.Repository Async) Test)
   (do random.monad
     [expected (_binary.random 100)]
-    (in (all _.and'
+    (in (all unit.and
              (do async.monad
                [.let [good_uri (/remote.uri (the //artifact.#version valid_artifact) valid_artifact //artifact/extension.lux_library)]
                 good_upload! (at subject upload good_uri expected)
@@ -36,7 +37,7 @@
                 .let [bad_uri (/remote.uri (the //artifact.#version invalid_artifact) invalid_artifact //artifact/extension.lux_library)]
                 bad_upload! (at subject upload bad_uri expected)
                 bad_download! (at subject download bad_uri)]
-               (_.coverage' [/.Repository]
+               (unit.coverage [/.Repository]
                  (let [successfull_flow!
                        (case [good_upload! good_download!]
                          [{try.#Success _} {try.#Success actual}]
-- 
cgit v1.2.3