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/test/aedifex/metadata/snapshot.lux | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'stdlib/source/test/aedifex/metadata/snapshot.lux')

diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux
index 773dd262b..983b78d6d 100644
--- a/stdlib/source/test/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/test/aedifex/metadata/snapshot.lux
@@ -1,7 +1,6 @@
 (.require
  [library
   [lux (.except)
-   ["_" test (.only Test)]
    [abstract
     [monad (.only do)]
     [\\specification
@@ -34,7 +33,9 @@
      ["[0]" year]
      ["[0]" month]
      ["[0]" instant (.only Instant)]
-     ["[0]" duration]]]]]
+     ["[0]" duration]]]
+   ["_" test (.only Test)
+    ["[0]" unit]]]]
  ["$[0]" ///
   ["[1][0]" artifact
    ["[1]/[0]" type]
@@ -117,7 +118,7 @@
                (in (do async.monad
                      [wrote? (/.write repository artifact expected)
                       actual (/.read repository artifact)]
-                     (_.coverage' [/.write /.read]
+                     (unit.coverage [/.write /.read]
                        (and (case wrote?
                               {try.#Success _} true
                               {try.#Failure _} false)
-- 
cgit v1.2.3