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

math.ranges: Add a bunch more tests for empty ranges.

db4
Doug Coleman 2013-03-20 13:13:09 -07:00
parent da0a123df3
commit eb136e0f21
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
basis/math/ranges/ranges-tests.factor
View File

@ -22,6 +22,32 @@ IN: math.ranges.tests
[ { 0 1/3 2/3 1 } ] [ 0 1 1/3 <range> >array ] unit-test
[ { 0 1/3 2/3 1 } ] [ 1 0 -1/3 <range> >array reverse ] unit-test
{ 0 } [ 0 -1 .0001 <range> length ] unit-test
{ 0 } [ 0 -1 .5 <range> length ] unit-test
{ 0 } [ 0 -1 1 <range> length ] unit-test
{ 0 } [ 0 -1 2 <range> length ] unit-test
{ 0 } [ 0 -1 3 <range> length ] unit-test
{ 0 } [ 0 -1 4 <range> length ] unit-test
{ 0 } [ 0 -2 .0001 <range> length ] unit-test
{ 0 } [ 0 -2 1 <range> length ] unit-test
{ 0 } [ 0 -2 2 <range> length ] unit-test
{ 0 } [ 0 -2 3 <range> length ] unit-test
{ 0 } [ 0 -2 4 <range> length ] unit-test
{ 0 } [ -1 0 -.0001 <range> length ] unit-test
{ 0 } [ -1 0 -.5 <range> length ] unit-test
{ 0 } [ -1 0 -1 <range> length ] unit-test
{ 0 } [ -1 0 -2 <range> length ] unit-test
{ 0 } [ -1 0 -3 <range> length ] unit-test
{ 0 } [ -1 0 -4 <range> length ] unit-test
{ 0 } [ -2 0 -.0001 <range> length ] unit-test
{ 0 } [ -2 0 -1 <range> length ] unit-test
{ 0 } [ -2 0 -2 <range> length ] unit-test
{ 0 } [ -2 0 -3 <range> length ] unit-test
{ 0 } [ -2 0 -4 <range> length ] unit-test
[ 100 ] [
1 100 [a,b] [ 2^ [1,b] ] map members length
] unit-test