sequences.extras: whoops, fix tests.

char-rename
John Benediktsson 2017-01-26 12:07:33 -08:00
parent a8a94c3960
commit e462f85c66
1 changed files with 4 additions and 4 deletions

View File

@ -245,8 +245,8 @@ IN: sequences.extras.tests
{ }
[ "test:" all-words [ name>> over prepend ] map-zip 2drop ] unit-test
{ { 0 1 2 3 } } [ 8 iota [ 4 < ] take-while ] unit-test
{ { } } [ { 15 16 } [ 4 < ] take-while ] unit-test
{ { 0 1 2 3 } } [ 8 iota [ 4 < ] take-while >array ] unit-test
{ { } } [ { 15 16 } [ 4 < ] take-while >array ] unit-test
{ { 4 5 6 7 } } [ 8 iota [ 4 < ] drop-while ] unit-test
{ { 15 16 } } [ { 15 16 } [ 4 < ] drop-while ] unit-test
{ { 4 5 6 7 } } [ 8 iota [ 4 < ] drop-while >array ] unit-test
{ { 15 16 } } [ { 15 16 } [ 4 < ] drop-while >array ] unit-test