aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/data/coll/array.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/data/coll/array.lux')
-rw-r--r--stdlib/source/lux/data/coll/array.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/data/coll/array.lux b/stdlib/source/lux/data/coll/array.lux
index 3e649fc7d..8f3bee0c3 100644
--- a/stdlib/source/lux/data/coll/array.lux
+++ b/stdlib/source/lux/data/coll/array.lux
@@ -2,7 +2,7 @@
lux
(lux (control [monoid #+ Monoid]
[functor #+ Functor]
- [equality #+ Eq]
+ [equivalence #+ Equivalence]
fold)
(data (coll [list "list/" Fold<List>])
[product])
@@ -149,8 +149,8 @@
#.None
output)))))
-(struct: #export (Eq<Array> Eq<a>)
- (All [a] (-> (Eq a) (Eq (Array a))))
+(struct: #export (Equivalence<Array> Equivalence<a>)
+ (All [a] (-> (Equivalence a) (Equivalence (Array a))))
(def: (= xs ys)
(let [sxs (size xs)
sxy (size ys)]
@@ -162,7 +162,7 @@
true
[(#.Some x) (#.Some y)]
- (:: Eq<a> = x y)
+ (:: Equivalence<a> = x y)
_
false)))