From dda05bca0956af5e5b3875c4cc36e61aa04772e4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 00:07:08 -0400
Subject: Made the "#" character great again!

---
 stdlib/source/program/aedifex/hash.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 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 4c2e3cd9f..4cbc77515 100644
--- a/stdlib/source/program/aedifex/hash.lux
+++ b/stdlib/source/program/aedifex/hash.lux
@@ -99,7 +99,7 @@
     [(def: .public (<name> data)
        (-> Binary (Try (Hash <kind>)))
        (if (n.= <size> (binary.size data))
-         {#try.Success (:abstraction data)}
+         {try.#Success (:abstraction data)}
          (exception.except <exception> [data])))]
 
     [as_sha-1 SHA-1 ..sha-1::size ..not_a_sha-1]
@@ -125,13 +125,13 @@
                output (binary.empty hash_size)]
           (let [index (n.* chunk i64.bytes_per_i64)]
             (case (text.split_at ..hex_per_chunk input)
-              {#.Some [head tail]}
+              {.#Some [head tail]}
               (do try.monad
                 [head (\ n.hex decoded head)
                  output (binary.write/64! index head output)]
                 (recur tail (++ chunk) output))
               
-              #.None
+              {.#None}
               (case (..hash_size input)
                 0 (constructor output)
                 (^template [<size> <write>]
-- 
cgit v1.2.3