From 2dbbaaec93a53f8dd0b96a0028b9cf125c9066cd Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 15:39:55 -0400
Subject: Re-named \ => # && \\ => ##

---
 stdlib/source/test/aedifex/hash.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/hash.lux b/stdlib/source/test/aedifex/hash.lux
index eb3886755..67dfa6b01 100644
--- a/stdlib/source/test/aedifex/hash.lux
+++ b/stdlib/source/test/aedifex/hash.lux
@@ -30,8 +30,8 @@
     (-> (-> Binary (/.Hash h))
         (Random (/.Hash h))))
   (do [! random.monad]
-    [size (\ ! each (n.% 100) random.nat)]
-    (\ ! each hash (_binary.random size))))
+    [size (# ! each (n.% 100) random.nat)]
+    (# ! each hash (_binary.random size))))
 
 (def: .public test
   Test
@@ -51,11 +51,11 @@
                                   (_.cover [<hash> <constructor> <exception>]
                                            (and (case (<constructor> (/.data expected))
                                                   {try.#Success actual}
-                                                  (\ /.equivalence = expected actual)
+                                                  (# /.equivalence = expected actual)
 
                                                   {try.#Failure error}
                                                   false)
-                                                (case (<constructor> (\ binary.monoid composite
+                                                (case (<constructor> (# binary.monoid composite
                                                                         (/.data expected)
                                                                         (/.data expected)))
                                                   {try.#Success actual}
@@ -80,8 +80,8 @@
                                [(do random.monad
                                   [expected (..random <hash>)]
                                   (_.cover [<codec>]
-                                           (case (\ <codec> decoded
-                                                    (format (\ <codec> encoded expected)
+                                           (case (# <codec> decoded
+                                                    (format (# <codec> encoded expected)
                                                             "AABBCC"))
                                              {try.#Success actual}
                                              false
-- 
cgit v1.2.3