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

(limited to 'stdlib/source/library/lux.lux')

diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux
index 17d7d3160..763b1b25f 100644
--- a/stdlib/source/library/lux.lux
+++ b/stdlib/source/library/lux.lux
@@ -3292,7 +3292,7 @@
 
                          _
                          ... TODO: Figure out why this doesn't work:
-                         ... (at meta#monad in token)
+                         ... (of meta#monad in token)
                          (meta#in token)}
                         token))))
 
@@ -5135,17 +5135,17 @@
       {.#None}
       (failure (..wrong_syntax_error (symbol ..with))))))
 
-(def .public at
+(def .public of
   (macro (_ tokens)
     (when tokens
       (list implementation [_ {#Symbol member}])
       (meta#in (list (` (..with (, implementation) (, (symbol$ member))))))
 
       (list#partial implementation member args)
-      (meta#in (list (` ((..at (, implementation) (, member)) (,* args)))))
+      (meta#in (list (` ((..of (, implementation) (, member)) (,* args)))))
       
       _
-      (failure (..wrong_syntax_error (symbol ..at))))))
+      (failure (..wrong_syntax_error (symbol ..of))))))
 
 (def .public has
   (macro (_ tokens)
@@ -5479,7 +5479,7 @@
                 (again &rest (property#with var_name expansion map)))
               
               {#End}
-              (at meta#monad #in (list#conjoint (list#each normal bodies))))))
+              (of meta#monad #in (list#conjoint (list#each normal bodies))))))
         
         {#None}
         (failure (..wrong_syntax_error (symbol ..with_expansions)))))))
-- 
cgit v1.2.3