Merge branch 'master' of git://factorcode.org/git/factor
commit
c5c31b4300
|
@ -1 +0,0 @@
|
|||
unportable
|
|
@ -1630,6 +1630,7 @@ ARTICLE: "sequences-destructive" "Destructive operations"
|
|||
"Other destructive words:"
|
||||
{ $subsections
|
||||
reverse!
|
||||
append!
|
||||
push-all
|
||||
move
|
||||
exchange
|
||||
|
|
|
@ -24,6 +24,12 @@ IN: sequences.tests
|
|||
[ 5040 { 1 1 2 6 24 120 720 } ]
|
||||
[ { 1 2 3 4 5 6 7 } 1 [ * ] accumulate ] unit-test
|
||||
|
||||
[ 5040 { 1 1 2 6 24 120 720 } ]
|
||||
[ { 1 2 3 4 5 6 7 } 1 [ * ] accumulate! ] unit-test
|
||||
|
||||
[ t ]
|
||||
[ { 1 2 3 4 5 6 7 } dup 1 [ * ] accumulate! nip eq? ] unit-test
|
||||
|
||||
[ f f ] [ [ ] [ ] find ] unit-test
|
||||
[ 0 1 ] [ [ 1 ] [ ] find ] unit-test
|
||||
[ 1 "world" ] [ [ "hello" "world" ] [ "world" = ] find ] unit-test
|
||||
|
|
Loading…
Reference in New Issue