From 94e5802f594a73245fce0fbd885103b8bf210d57 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 2 Dec 2022 19:33:00 -0400
Subject: Added some simple time-series handling machinery.

---
 stdlib/source/test/aedifex/dependency/deployment.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'stdlib/source/test/aedifex/dependency/deployment.lux')

diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index 6e8aff6b6..3e7350050 100644
--- a/stdlib/source/test/aedifex/dependency/deployment.lux
+++ b/stdlib/source/test/aedifex/dependency/deployment.lux
@@ -149,7 +149,7 @@
   Test
   (<| (_.covering /._)
       (do [! random.monad]
-        [address (at ! each (text.suffix uri.separator)
+        [address (of ! each (text.suffix uri.separator)
                      (random.upper_cased 10))]
         (all _.and
              (do [! random.monad]
@@ -167,12 +167,12 @@
                            (try.else false))))))
              (do [! random.monad]
                [.let [hash (is (Hash [Dependency Artifact Package])
-                               (at hash.functor each (|>> product.right product.left product.left)
+                               (of hash.functor each (|>> product.right product.left product.left)
                                    text.hash))]
-                num_bundles (at ! each (n.% 10) random.nat)
+                num_bundles (of ! each (n.% 10) random.nat)
                 bundles (|> ..bundle
                             (random.set hash num_bundles)
-                            (at ! each set.list))
+                            (of ! each set.list))
                 .let [resolution (list#mix (function (_ [dependency expected_artifact package] resolution)
                                              (dictionary.has dependency package resolution))
                                            resolution.empty
-- 
cgit v1.2.3