Fix conflict

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

diff --git a/core/assocs/assocs.factor b/core/assocs/assocs.factor
index fdaa02e6c42cd4e8815cdc3181271f0de49f63d3..c4deddae3949d97fa1104782cfba7d4e25fe1cde 100755 (executable)
--- a/core/assocs/assocs.factor
+++ b/core/assocs/assocs.factor
@@ -71,7 +71,7 @@ PRIVATE>
 
 : assoc-partition ( assoc quot -- true-assoc false-assoc )
     [ (assoc-each) partition ] [ drop ] 2bi
-    tuck [ assoc-like ] 2bi@ ; inline
+    [ assoc-like ] curry bi@ ; inline
 
 : assoc-any? ( assoc quot -- ? )
     assoc-find 2nip ; inline