From 34e310622bdeb1d0588c0664c0e78cbaa84f837c Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 2 Dec 2020 06:42:20 -0400
Subject: Re-named "::" and ":::" macros to "\" and "\\", to be consistent with
 the convention that only macros that deal with types may start with a colon.

---
 stdlib/source/test/aedifex/package.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/package.lux b/stdlib/source/test/aedifex/package.lux
index 5400d4953..c1add80d3 100644
--- a/stdlib/source/test/aedifex/package.lux
+++ b/stdlib/source/test/aedifex/package.lux
@@ -34,7 +34,7 @@
 (def: #export random
   (Random [//.Profile /.Package])
   (do {! random.monad}
-    [content-size (:: ! map (n.% 100) random.nat)
+    [content-size (\ ! map (n.% 100) random.nat)
      content (_binary.random content-size)
      [profile pom] (random.one (function (_ profile)
                                  (try.to-maybe
@@ -52,17 +52,17 @@
         [[profile package] ..random]
         ($_ _.and
             (_.cover [/.local]
-                     (and (:: //hash.equivalence =
-                              (//hash.sha-1 (get@ #/.library package))
-                              (get@ #/.sha-1 package))
-                          (:: //hash.equivalence =
-                              (//hash.md5 (get@ #/.library package))
-                              (get@ #/.md5 package))))
+                     (and (\ //hash.equivalence =
+                             (//hash.sha-1 (get@ #/.library package))
+                             (get@ #/.sha-1 package))
+                          (\ //hash.equivalence =
+                             (//hash.md5 (get@ #/.library package))
+                             (get@ #/.md5 package))))
             (_.cover [/.dependencies]
                      (let [expected (get@ #//.dependencies profile)]
                        (case (/.dependencies package)
                          (#try.Success actual)
-                         (:: set.equivalence = expected actual)
+                         (\ set.equivalence = expected actual)
                          
                          (#try.Failure error)
                          false)))
-- 
cgit v1.2.3