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

circular-while*, add corner case test

db4
Jon Harper 2013-07-29 22:27:17 +02:00 committed by John Benediktsson
parent 2dba2504fa
commit b5700cd3f5
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/circular/circular-tests.factor
View File

@ -48,3 +48,9 @@ IN: circular.tests
[ [ push ] [ length 5 < ] bi ] curry circular-while* [ [ push ] [ length 5 < ] bi ] curry circular-while*
] keep ] keep
] unit-test ] unit-test
[ V{ 1 } ] [
{ 1 2 3 } <circular> V{ } [
[ push f ] curry circular-while*
] keep
] unit-test