diff options
author | Eduardo Julian | 2022-07-02 05:38:27 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-07-02 05:38:27 -0400 |
commit | b96beb587c11fcfbce86ce2d62351600cf6cad1b (patch) | |
tree | c9a558ab1391ac97cb11e8777ea78299f1ab5555 /stdlib/source/test/aedifex/hash.lux | |
parent | 104130efba46a875eba566384578f8aa8593ad37 (diff) |
More traditional names for unquoting macros.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/aedifex/hash.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/aedifex/hash.lux b/stdlib/source/test/aedifex/hash.lux index 1d8569413..0bce4febc 100644 --- a/stdlib/source/test/aedifex/hash.lux +++ b/stdlib/source/test/aedifex/hash.lux @@ -45,7 +45,7 @@ )) (_.for [/.data] (all _.and - (~~ (with_template [<hash> <constructor> <exception>] + (,, (with_template [<hash> <constructor> <exception>] [(do random.monad [expected (..random <hash>)] (_.coverage [<hash> <constructor> <exception>] @@ -67,7 +67,7 @@ [/.sha-1 /.as_sha-1 /.not_a_sha-1] [/.md5 /.as_md5 /.not_a_md5] )))) - (~~ (with_template [<codec> <hash>] + (,, (with_template [<codec> <hash>] [(_.for [<codec>] ($codec.spec /.equivalence <codec> (..random <hash>)))] @@ -76,7 +76,7 @@ )) (_.for [/.not_a_hash] (all _.and - (~~ (with_template [<codec> <hash>] + (,, (with_template [<codec> <hash>] [(do random.monad [expected (..random <hash>)] (_.coverage [<codec>] |