]> gitweb.factorcode.org Git - factor.git/commitdiff
sequences: add declaration so that array-flip compiles better
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Wed, 29 Jul 2009 02:33:12 +0000 (21:33 -0500)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Wed, 29 Jul 2009 02:33:12 +0000 (21:33 -0500)
core/sequences/sequences.factor

index 55d4bc9be91130ebe7311e9f891c4448e574b887..17dbcf5c3cbb8b7a87e8df8d00cafe7de0801e07 100755 (executable)
@@ -927,7 +927,7 @@ USE: arrays
 : array-flip ( matrix -- newmatrix )
     { array } declare
     [ dup first array-length [ array-length min ] reduce ] keep
-    [ [ array-nth ] with { } map-as ] curry { } map-as ;
+    [ [ { array } declare array-nth ] with { } map-as ] curry { } map-as ;
 
 PRIVATE>