diff --git a/basis/hash-sets/wrapped/wrapped.factor b/basis/hash-sets/wrapped/wrapped.factor index b70b7da618..76dc893edc 100644 --- a/basis/hash-sets/wrapped/wrapped.factor +++ b/basis/hash-sets/wrapped/wrapped.factor @@ -40,7 +40,7 @@ M: wrapped-hash-set cardinality underlying>> cardinality ; inline M: wrapped-hash-set members - underlying>> members [ underlying>> ] map ; + underlying>> members [ underlying>> ] map! ; M: wrapped-hash-set equal? over wrapped-hash-set? [ [ underlying>> ] same? ] [ 2drop f ] if ;