aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-07-11 01:51:04 -0400
committerEduardo Julian2021-07-11 01:51:04 -0400
commitabe24425ced15fd784ef6c62d6f186af72b491db (patch)
tree42b6e3cbd179c83fae8941fa4b128b13afc766f5 /stdlib/source/test/lux.lux
parent4610968193df10af12c91f699fec39aeb3ef703a (diff)
Re-named ":coerce" to ":as" since it technically doesn't do coercions.
Diffstat (limited to 'stdlib/source/test/lux.lux')
-rw-r--r--stdlib/source/test/lux.lux5
1 files changed, 3 insertions, 2 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index b320841c5..415bb3500 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -58,8 +58,9 @@
(def: identity
Test
(do {! random.monad}
- [#let [object (: (Random (Atom Text))
- (\ ! map atom.atom (random.unicode 1)))]
+ [value random.nat
+ #let [object (: (Random (Atom Nat))
+ (\ ! map atom.atom (wrap value)))]
self object]
($_ _.and
(_.test "Every value is identical to itself."