assocs: rename assoc-combine/refine to assoc-union-all/intersect-all

[factor.git] / core / assocs / assocs.factor

diff --git a/core/assocs/assocs.factor b/core/assocs/assocs.factor
index a199abb2dcabe02de03e5a6dba1194016e1cc9e0..003b2a4a1a0a41181908735a64d62af7be1e3c32 100644 (file)
--- a/core/assocs/assocs.factor
+++ b/core/assocs/assocs.factor
@@ -166,10 +166,10 @@ M: assoc values [ nip ] { } assoc>map ;
 : assoc-union ( assoc1 assoc2 -- union )
     over assoc-union-as ;
 
-: assoc-combine ( seq -- union )
+: assoc-union-all ( seq -- union )
     H{ } clone [ assoc-union! ] reduce ;
 
-: assoc-refine ( seq -- assoc )
+: assoc-intersect-all ( seq -- assoc )
     [ f ] [ [ ] [ assoc-intersect ] map-reduce ] if-empty ;
 
 : assoc-differ ( key -- quot )