steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of git://factorcode.org/git/factor

db4
Doug Coleman 2008-12-09 21:55:00 -06:00
parent 4f2c612cda 06353b3442
commit f9332aa907
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
core/sequences/sequences.factor
View File

@ -845,9 +845,10 @@ PRIVATE>
USE: arrays
: array-length ( array -- len )
{ array } declare length>> ;
{ array } declare length>> ; inline
: array-flip ( matrix -- newmatrix )
{ array } declare
[ dup first array-length [ array-length min ] reduce ] keep
[ [ array-nth ] with { } map-as ] curry { } map-as ;