factor: last iota -> <iota> fix.

char-rename
Doug Coleman 2017-06-02 17:39:40 -05:00
parent 32710df620
commit 48344ab55c
3 changed files with 3 additions and 3 deletions

View File

@ -41,7 +41,7 @@ IN: concurrency.combinators.tests
{ 20 }
[
V{ } clone
10 <iota> 10 iota pick [ [ push ] [ push ] bi ] curry 2parallel-each
10 <iota> 10 <iota> pick [ [ push ] [ push ] bi ] curry 2parallel-each
length
] unit-test

View File

@ -56,7 +56,7 @@ vectors math math.order ;
] unit-test
{ t } [
10000 <iota> >persistent-vector 752 [ ppop ] times dup length iota sequence=
10000 <iota> >persistent-vector 752 [ ppop ] times dup length <iota> sequence=
] unit-test
{ t } [

View File

@ -103,7 +103,7 @@ IN: sequences.extras.tests
{ "lohel" } [ "hello" dup -12 rotate! ] unit-test
{ { } } [ { } [ ] map-concat ] unit-test
{ V{ 0 0 1 0 1 2 } } [ 4 <iota> [ iota ] map-concat ] unit-test
{ V{ 0 0 1 0 1 2 } } [ 4 <iota> [ <iota> ] map-concat ] unit-test
{ "abc" } [ "abc" [ 1string ] map-concat ] unit-test
{ "abc" } [ { 97 98 99 } [ 1string ] map-concat ] unit-test
{ { 97 98 99 } } [ "abc" [ 1string ] { } map-concat-as ] unit-test