]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/quadtrees/quadtrees.factor
Merge branch 'master' of git://factorcode.org/git/factor
[factor.git] / extra / quadtrees / quadtrees.factor
index 1a916c74f4aa79ef01c03a29b26982add1842006..6fe361b556c565ae6a39052a925fde8243909f57 100644 (file)
@@ -194,5 +194,5 @@ M: quadtree clear-assoc ( assoc -- )
 : swizzle ( sequence quot -- sequence' )
     [ dup ] dip map
     [ zip ] [ rect-containing <quadtree> ] bi
-    [ '[ first2 _ set-at ] each ] [ values ] bi ;
+    [ '[ first2 _ set-at ] each ] [ values ] bi ; inline