diff options
author | Eduardo Julian | 2021-08-23 02:30:53 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-08-23 02:30:53 -0400 |
commit | ec1f31b5a1492d5e0ab260397291d4449483bbd9 (patch) | |
tree | c730b4ca89af366779b0ad0f46fae705b5c2bcbc /stdlib/source/test/aedifex/dependency | |
parent | 1ea83ecadccc5adee1bdb35bd11527c3982c015e (diff) |
The Python compiler can now be compiled by the new JVM compiler.
Diffstat (limited to 'stdlib/source/test/aedifex/dependency')
-rw-r--r-- | stdlib/source/test/aedifex/dependency/deployment.lux | 10 | ||||
-rw-r--r-- | stdlib/source/test/aedifex/dependency/resolution.lux | 42 |
2 files changed, 26 insertions, 26 deletions
diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux index 009298783..97fd9f1f4 100644 --- a/stdlib/source/test/aedifex/dependency/deployment.lux +++ b/stdlib/source/test/aedifex/dependency/deployment.lux @@ -20,7 +20,7 @@ [collection ["." dictionary (#+ Dictionary)] ["." set] - ["." list ("#\." fold)]]] + ["." list ("#\." mix)]]] [math ["." random (#+ Random)] [number @@ -171,10 +171,10 @@ bundles (|> ..bundle (random.set hash num_bundles) (\ ! map set.list)) - .let [resolution (list\fold (function (_ [dependency expected_artifact package] resolution) - (dictionary.has dependency package resolution)) - resolution.empty - bundles) + .let [resolution (list\mix (function (_ [dependency expected_artifact package] resolution) + (dictionary.has dependency package resolution)) + resolution.empty + bundles) cache (: Cache (atom.atom (dictionary.empty text.hash))) http (..http cache) diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux index 44420243d..355cf9c98 100644 --- a/stdlib/source/test/aedifex/dependency/resolution.lux +++ b/stdlib/source/test/aedifex/dependency/resolution.lux @@ -77,14 +77,14 @@ (def: sha-1 (-> Binary Binary) (|>> ///hash.sha-1 - (\ ///hash.sha-1_codec encode) - (\ utf8.codec encode))) + (\ ///hash.sha-1_codec encoded) + (\ utf8.codec encoded))) (def: md5 (-> Binary Binary) (|>> ///hash.md5 - (\ ///hash.md5_codec encode) - (\ utf8.codec encode))) + (\ ///hash.md5_codec encoded) + (\ utf8.codec encoded))) (def: .public nope (Mock Any) @@ -112,8 +112,8 @@ (|> package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode)))] + (\ xml.codec encoded) + (\ utf8.codec encoded)))] (cond (text.ends_with? ///artifact/extension.lux_library uri) (#try.Success [state library]) @@ -166,23 +166,23 @@ (#try.Success [state (|> expected_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode))]) + (\ xml.codec encoded) + (\ utf8.codec encoded))]) (text.ends_with? ..pom_sha-1 uri) (#try.Success [state (|> dummy_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode) + (\ xml.codec encoded) + (\ utf8.codec encoded) ..sha-1)]) (text.ends_with? ..pom_md5 uri) (#try.Success [state (|> expected_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode) + (\ xml.codec encoded) + (\ utf8.codec encoded) ..md5)]) ... else @@ -219,23 +219,23 @@ (#try.Success [state (|> expected_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode))]) + (\ xml.codec encoded) + (\ utf8.codec encoded))]) (text.ends_with? ..pom_sha-1 uri) (#try.Success [state (|> expected_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode) + (\ xml.codec encoded) + (\ utf8.codec encoded) ..sha-1)]) (text.ends_with? ..pom_md5 uri) (#try.Success [state (|> dummy_package (value@ #///package.pom) product.left - (\ xml.codec encode) - (\ utf8.codec encode) + (\ xml.codec encoded) + (\ utf8.codec encoded) ..md5)]) ... else @@ -381,17 +381,17 @@ dependee_package (with@ #///package.pom [dependee_pom - (|> dependee_pom (\ xml.codec encode) (\ utf8.codec encode)) + (|> dependee_pom (\ xml.codec encoded) (\ utf8.codec encoded)) #///dependency/status.Unverified] dependee_package) depender_package (with@ #///package.pom [depender_pom - (|> depender_pom (\ xml.codec encode) (\ utf8.codec encode)) + (|> depender_pom (\ xml.codec encoded) (\ utf8.codec encoded)) #///dependency/status.Unverified] depender_package) ignored_package (with@ #///package.pom [ignored_pom - (|> ignored_pom (\ xml.codec encode) (\ utf8.codec encode)) + (|> ignored_pom (\ xml.codec encoded) (\ utf8.codec encoded)) #///dependency/status.Unverified] ignored_package)]] (in [[dependee depender ignored] |