diff --git a/core/hash-sets/hash-sets.factor b/core/hash-sets/hash-sets.factor index b01fe6fa9e..a094c015b2 100644 --- a/core/hash-sets/hash-sets.factor +++ b/core/hash-sets/hash-sets.factor @@ -136,8 +136,7 @@ INSTANCE: hash-set set M: hash-set intersect small/large sequence/tester filter >hash-set ; -M: hash-set union - [ ?members ] [ clone ] bi* [ [ adjoin ] curry each ] keep ; +M: hash-set union (union) >hash-set ; M: hash-set diff sequence/tester [ not ] compose filter >hash-set ;