aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/package.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-02 06:42:20 -0400
committerEduardo Julian2020-12-02 06:42:20 -0400
commit34e310622bdeb1d0588c0664c0e78cbaa84f837c (patch)
treeeb7c04185b57c781f45d0ccdb955bc9afc2aa8dc /stdlib/source/test/aedifex/package.lux
parent982a19e0c5d57b53f9726b780fec4c18f0787b4f (diff)
Re-named "::" and ":::" macros to "\" and "\\", to be consistent with the convention that only macros that deal with types may start with a colon.
Diffstat (limited to 'stdlib/source/test/aedifex/package.lux')
-rw-r--r--stdlib/source/test/aedifex/package.lux16
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/test/aedifex/package.lux b/stdlib/source/test/aedifex/package.lux
index 5400d4953..c1add80d3 100644
--- a/stdlib/source/test/aedifex/package.lux
+++ b/stdlib/source/test/aedifex/package.lux
@@ -34,7 +34,7 @@
(def: #export random
(Random [//.Profile /.Package])
(do {! random.monad}
- [content-size (:: ! map (n.% 100) random.nat)
+ [content-size (\ ! map (n.% 100) random.nat)
content (_binary.random content-size)
[profile pom] (random.one (function (_ profile)
(try.to-maybe
@@ -52,17 +52,17 @@
[[profile package] ..random]
($_ _.and
(_.cover [/.local]
- (and (:: //hash.equivalence =
- (//hash.sha-1 (get@ #/.library package))
- (get@ #/.sha-1 package))
- (:: //hash.equivalence =
- (//hash.md5 (get@ #/.library package))
- (get@ #/.md5 package))))
+ (and (\ //hash.equivalence =
+ (//hash.sha-1 (get@ #/.library package))
+ (get@ #/.sha-1 package))
+ (\ //hash.equivalence =
+ (//hash.md5 (get@ #/.library package))
+ (get@ #/.md5 package))))
(_.cover [/.dependencies]
(let [expected (get@ #//.dependencies profile)]
(case (/.dependencies package)
(#try.Success actual)
- (:: set.equivalence = expected actual)
+ (\ set.equivalence = expected actual)
(#try.Failure error)
false)))