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/input.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/input.lux b/stdlib/source/test/aedifex/input.lux
index 7dc6ccc8e..76cf34c7c 100644
--- a/stdlib/source/test/aedifex/input.lux
+++ b/stdlib/source/test/aedifex/input.lux
@@ -52,19 +52,19 @@
   Test
   (<| (_.covering /._)
       (do [! random.monad]
-        [expected (at ! each (has //.#parents (list)) $profile.random)
+        [expected (of ! each (has //.#parents (list)) $profile.random)
          .let [fs (is (file.System Async)
-                      (file.mock (at file.default separator)))]]
+                      (file.mock (of file.default separator)))]]
         (in (do async.monad
               [verdict (do //action.monad
                          [.let [profile (|> expected
                                             (//project.project //.default)
                                             //format.project
                                             %.code
-                                            (at utf8.codec encoded))]
-                          _ (at fs write //project.file profile)
+                                            (of utf8.codec encoded))]
+                          _ (of fs write //project.file profile)
                           actual (is (Async (Try Profile))
                                      (/.read async.monad fs (list)))]
-                         (in (at //.equivalence = (with_defaults expected) actual)))]
+                         (in (of //.equivalence = (with_defaults expected) actual)))]
               (unit.coverage [/.read]
                 (try.else false verdict)))))))
-- 
cgit v1.2.3