aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/cache.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-04-09 03:03:46 -0400
committerEduardo Julian2022-04-09 03:03:46 -0400
commit04c7f49a732380a2b9f72b1b937171b341c24323 (patch)
treed54c92bf10665bba0ec4643746becce569604fb2 /stdlib/source/test/aedifex/cache.lux
parentf11afb9d2dfe2d59b41e8056eb8c4ae65268415f (diff)
Better names for testing macros (plus better indentation).
Diffstat (limited to 'stdlib/source/test/aedifex/cache.lux')
-rw-r--r--stdlib/source/test/aedifex/cache.lux36
1 files changed, 18 insertions, 18 deletions
diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux
index a641ee369..690ff01ff 100644
--- a/stdlib/source/test/aedifex/cache.lux
+++ b/stdlib/source/test/aedifex/cache.lux
@@ -110,14 +110,14 @@
(in (do async.monad
[wrote! (/.write_one program fs dependency expected_package)
read! (/.read_one program fs dependency)]
- (_.cover' [/.write_one /.read_one]
- (<| (try.else false)
- (do try.monad
- [_ wrote!
- actual_package read!]
- (in (# //package.equivalence =
- (has //package.#origin {//repository/origin.#Local ""} expected_package)
- actual_package)))))))))
+ (_.coverage' [/.write_one /.read_one]
+ (<| (try.else false)
+ (do try.monad
+ [_ wrote!
+ actual_package read!]
+ (in (# //package.equivalence =
+ (has //package.#origin {//repository/origin.#Local ""} expected_package)
+ actual_package)))))))))
(def: plural
Test
@@ -131,16 +131,16 @@
(in (do async.monad
[wrote! (/.write_all program fs expected)
read! (/.read_all program fs (dictionary.keys expected) //dependency/resolution.empty)]
- (_.cover' [/.write_all /.read_all]
- (<| (try.else false)
- (do try.monad
- [_ wrote!
- actual read!]
- (in (# //dependency/resolution.equivalence =
- (# dictionary.functor each
- (has //package.#origin {//repository/origin.#Local ""})
- expected)
- actual)))))))))
+ (_.coverage' [/.write_all /.read_all]
+ (<| (try.else false)
+ (do try.monad
+ [_ wrote!
+ actual read!]
+ (in (# //dependency/resolution.equivalence =
+ (# dictionary.functor each
+ (has //package.#origin {//repository/origin.#Local ""})
+ expected)
+ actual)))))))))
(def: .public test
Test