From 4ca397765805eda5ddee393901ed3a02001a960a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 25 Dec 2020 09:22:38 -0400
Subject: Replaced kebab-case with snake_case for naming convention.

---
 stdlib/source/test/aedifex/hash.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 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 455835b84..502130970 100644
--- a/stdlib/source/test/aedifex/hash.lux
+++ b/stdlib/source/test/aedifex/hash.lux
@@ -64,17 +64,17 @@
                                                   (#try.Failure error)
                                                   (exception.match? <exception> error)))))]
 
-                               [/.sha-1 /.as-sha-1 /.not-a-sha-1]
-                               [/.md5 /.as-md5 /.not-a-md5]
+                               [/.sha-1 /.as_sha-1 /.not_a_sha-1]
+                               [/.md5 /.as_md5 /.not_a_md5]
                                ))))
               (~~ (template [<codec> <hash>]
                     [(_.for [<codec>]
                             ($codec.spec /.equivalence <codec> (..random <hash>)))]
                     
-                    [/.sha-1-codec /.sha-1]
-                    [/.md5-codec /.md5]
+                    [/.sha-1_codec /.sha-1]
+                    [/.md5_codec /.md5]
                     ))
-              (_.for [/.not-a-hash]
+              (_.for [/.not_a_hash]
                      ($_ _.and
                          (~~ (template [<codec> <hash>]
                                [(do random.monad
@@ -87,9 +87,9 @@
                                              false
 
                                              (#try.Failure error)
-                                             (exception.match? /.not-a-hash error))))]
+                                             (exception.match? /.not_a_hash error))))]
 
-                               [/.sha-1-codec /.sha-1]
-                               [/.md5-codec /.md5]
+                               [/.sha-1_codec /.sha-1]
+                               [/.md5_codec /.md5]
                                ))))
               ))))
-- 
cgit v1.2.3