aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/command/deps.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-25 09:22:38 -0400
committerEduardo Julian2020-12-25 09:22:38 -0400
commit4ca397765805eda5ddee393901ed3a02001a960a (patch)
tree2ab184a1a4e244f3a69e86c8a7bb3ad49c22b4a3 /stdlib/source/test/aedifex/command/deps.lux
parentd29e091e98dabb8dfcf816899ada480ecbf7e357 (diff)
Replaced kebab-case with snake_case for naming convention.
Diffstat (limited to 'stdlib/source/test/aedifex/command/deps.lux')
-rw-r--r--stdlib/source/test/aedifex/command/deps.lux54
1 files changed, 27 insertions, 27 deletions
diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux
index 84c51dc93..7002238e7 100644
--- a/stdlib/source/test/aedifex/command/deps.lux
+++ b/stdlib/source/test/aedifex/command/deps.lux
@@ -52,55 +52,55 @@
(<| (_.covering /._)
(do random.monad
[home (random.ascii/alpha 5)
- working-directory (random.ascii/alpha 5)
+ working_directory (random.ascii/alpha 5)
- dependee-artifact $///artifact.random
- depender-artifact (random.filter (predicate.complement
- (\ ///artifact.equivalence = dependee-artifact))
+ dependee_artifact $///artifact.random
+ depender_artifact (random.filter (predicate.complement
+ (\ ///artifact.equivalence = dependee_artifact))
$///artifact.random)
- [_ dependee-package] $///package.random
- [_ depender-package] $///package.random
+ [_ dependee_package] $///package.random
+ [_ depender_package] $///package.random
- #let [dependee {#///dependency.artifact dependee-artifact
- #///dependency.type ///artifact/type.lux-library}
- depender {#///dependency.artifact depender-artifact
- #///dependency.type ///artifact/type.lux-library}
+ #let [dependee {#///dependency.artifact dependee_artifact
+ #///dependency.type ///artifact/type.lux_library}
+ depender {#///dependency.artifact depender_artifact
+ #///dependency.type ///artifact/type.lux_library}
- dependee-pom (|> (\ ///.monoid identity)
- (set@ #///.identity (#.Some dependee-artifact))
+ dependee_pom (|> (\ ///.monoid identity)
+ (set@ #///.identity (#.Some dependee_artifact))
///pom.write
try.assume)
- depender-pom (|> (\ ///.monoid identity)
- (set@ #///.identity (#.Some depender-artifact))
- (set@ #///.dependencies (set.from-list ///dependency.hash (list dependee)))
+ depender_pom (|> (\ ///.monoid identity)
+ (set@ #///.identity (#.Some depender_artifact))
+ (set@ #///.dependencies (set.from_list ///dependency.hash (list dependee)))
///pom.write
try.assume)
- dependee-package (|> dependee-package
+ dependee_package (|> dependee_package
(set@ #///package.origin #///package.Remote)
- (set@ #///package.pom [dependee-pom #///dependency/status.Unverified]))
- depender-package (|> depender-package
+ (set@ #///package.pom [dependee_pom #///dependency/status.Unverified]))
+ depender_package (|> depender_package
(set@ #///package.origin #///package.Remote)
- (set@ #///package.pom [depender-pom #///dependency/status.Unverified]))
+ (set@ #///package.pom [depender_pom #///dependency/status.Unverified]))
fs (file.mock (\ file.default separator))
- program (program.async (program.mock environment.empty home working-directory))]]
+ program (program.async (program.mock environment.empty home working_directory))]]
(wrap (do promise.monad
[verdict (do ///action.monad
[#let [console (@version.echo "")]
pre (|> ///dependency/resolution.empty
- (dictionary.put dependee dependee-package)
- (///cache.write-all program fs))
+ (dictionary.put dependee dependee_package)
+ (///cache.write_all program fs))
post (|> (\ ///.monoid identity)
- (set@ #///.dependencies (set.from-list ///dependency.hash (list dependee depender)))
- (/.do! program console fs (list (///repository.mock ($///dependency/resolution.single depender-artifact depender-package) []))))
+ (set@ #///.dependencies (set.from_list ///dependency.hash (list dependee depender)))
+ (/.do! program console fs (list (///repository.mock ($///dependency/resolution.single depender_artifact depender_package) []))))
logging! (\ ///action.monad map
(text\= //clean.success)
- (!.use (\ console read-line) []))]
+ (!.use (\ console read_line) []))]
(wrap (and logging!
- (and (set.member? pre dependee-artifact)
- (not (set.member? pre depender-artifact)))
+ (and (set.member? pre dependee_artifact)
+ (not (set.member? pre depender_artifact)))
(and (dictionary.key? post dependee)
(dictionary.key? post depender)))))]
(_.cover' [/.do!]