From f9e33ae96aec4741385a576719786092c9e68043 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 4 Jun 2022 19:34:42 -0400
Subject: De-sigil-ification: #

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

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

diff --git a/stdlib/source/program/aedifex/hash.lux b/stdlib/source/program/aedifex/hash.lux
index c38f993c4..b566dc5e6 100644
--- a/stdlib/source/program/aedifex/hash.lux
+++ b/stdlib/source/program/aedifex/hash.lux
@@ -58,7 +58,7 @@
   (def: encoded
     (Format Binary)
     (binary.mix (function (_ byte representation)
-                  (let [hex (# n.hex encoded byte)
+                  (let [hex (at n.hex encoded byte)
                         hex (case (text.size hex)
                               1 (format "0" hex)
                               _ hex)]
@@ -130,7 +130,7 @@
             (case (text.split_at ..hex_per_chunk input)
               {.#Some [head tail]}
               (do try.monad
-                [head (# n.hex decoded head)
+                [head (at n.hex decoded head)
                  output (binary.has_64! index head output)]
                 (again tail (++ chunk) output))
               
@@ -140,7 +140,7 @@
                 (^.template [<size> <write>]
                   [<size>
                    (do try.monad
-                     [head (# n.hex decoded input)
+                     [head (at n.hex decoded input)
                       output (<write> index head output)]
                      (constructor output))])
                 ([1 binary.has_8!]
@@ -164,7 +164,7 @@
     (All (_ h) (Equivalence (Hash h)))
 
     (def: (= reference subject)
-      (# binary.equivalence =
-         (representation reference)
-         (representation subject))))
+      (at binary.equivalence =
+          (representation reference)
+          (representation subject))))
   )
-- 
cgit v1.2.3