From 240a4465157bb903dd2a3ee4cdc28aadf09f8dcb Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 19 Dec 2022 20:56:06 -0400
Subject: Added price-action abstraction.

---
 stdlib/source/test/aedifex/hash.lux | 7 ++++---
 1 file changed, 4 insertions(+), 3 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 36326a58f..55cd89bba 100644
--- a/stdlib/source/test/aedifex/hash.lux
+++ b/stdlib/source/test/aedifex/hash.lux
@@ -4,8 +4,9 @@
    [abstract
     [monad (.only do)]
     [\\specification
-     ["$[0]" equivalence]
-     ["$[0]" codec]]]
+     ["$[0]" equivalence]]
+    ["[0]" codec
+     ["[1]T" \\test]]]
    [control
     ["[0]" try]
     ["[0]" exception]]
@@ -70,7 +71,7 @@
                                  ))))
                (,, (with_template [<codec> <hash>]
                      [(_.for [<codec>]
-                             ($codec.spec /.equivalence <codec> (..random <hash>)))]
+                             (codecT.spec /.equivalence <codec> (..random <hash>)))]
                      
                      [/.sha1_codec /.sha1]
                      [/.md5_codec /.md5]
-- 
cgit v1.2.3