diff options
| author | Eduardo Julian | 2021-08-12 03:12:42 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-08-12 03:12:42 -0400 |
| commit | 17629d66062b88b040a2397032f6c08361a5f3a7 (patch) | |
| tree | bdc6110750b895667b9e45da5e46bec9609f9a7c /stdlib/source/test/aedifex/dependency | |
| parent | a62ce3f9c2b605e0033f4772b0f64c4525de4d86 (diff) | |
Improved binding syntax for "syntax:".
Diffstat (limited to 'stdlib/source/test/aedifex/dependency')
| -rw-r--r-- | stdlib/source/test/aedifex/dependency/deployment.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/test/aedifex/dependency/resolution.lux | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux index 7352de63a..ccccc47cd 100644 --- a/stdlib/source/test/aedifex/dependency/deployment.lux +++ b/stdlib/source/test/aedifex/dependency/deployment.lux @@ -69,7 +69,7 @@ [_ (: (IO Any) (case [method input] [#@http.Put (#.Some input)] - (atom.update! (dictionary.put url input) cache) + (atom.update! (dictionary.has url input) cache) _ (in [])))] @@ -172,7 +172,7 @@ (random.set hash num_bundles) (\ ! map set.list)) .let [resolution (list\fold (function (_ [dependency expected_artifact package] resolution) - (dictionary.put dependency package resolution)) + (dictionary.has dependency package resolution)) resolution.empty bundles) cache (: Cache diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux index 4bef34eff..da101dfa2 100644 --- a/stdlib/source/test/aedifex/dependency/resolution.lux +++ b/stdlib/source/test/aedifex/dependency/resolution.lux @@ -53,7 +53,7 @@ (do {! random.monad} [artifact $///artifact.random [_ package] $///package.random] - (in (dictionary.put {#///dependency.artifact artifact + (in (dictionary.has {#///dependency.artifact artifact #///dependency.type ///artifact/type.lux_library} package /.empty)))) |