File tree Expand file tree Collapse file tree 1 file changed +8
-4
lines changed Expand file tree Collapse file tree 1 file changed +8
-4
lines changed Original file line number Diff line number Diff line change @@ -8662,8 +8662,10 @@ reduces them without incurring seq initialization"
8662
8662
(and
8663
8663
(set? other)
8664
8664
(== (count coll) (count other))
8665
- (every? #(contains? coll %)
8666
- other)))
8665
+ ^boolean
8666
+ (reduce-kv
8667
+ #(or (contains? other %2 ) (reduced false ))
8668
+ true hash-map)))
8667
8669
8668
8670
IHash
8669
8671
(-hash [coll] (caching-hash coll hash-unordered-coll __hash))
@@ -8811,8 +8813,10 @@ reduces them without incurring seq initialization"
8811
8813
(and
8812
8814
(set? other)
8813
8815
(== (count coll) (count other))
8814
- (every? #(contains? coll %)
8815
- other)))
8816
+ ^boolean
8817
+ (reduce-kv
8818
+ #(or (contains? other %2 ) (reduced false ))
8819
+ true tree-map)))
8816
8820
8817
8821
IHash
8818
8822
(-hash [coll] (caching-hash coll hash-unordered-coll __hash))
You can’t perform that action at this time.
0 commit comments