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

add unit tests for comparisons against nan

Joe Groff 2009-09-03 17:27:06 -05:00
parent 7a429a530e
commit 6aef0184d9
1 changed files with 32 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
core/math/math-tests.factor
View File

@ -36,3 +36,35 @@ IN: math.tests
[ -0.0 ] [ 0.0 prev-float ] unit-test
[ t ] [ 1.0 dup prev-float > ] unit-test
[ t ] [ -1.0 dup prev-float > ] unit-test
[ f ] [ 0/0. 0/0. = ] unit-test
[ f ] [ 0/0. 1.0 = ] unit-test
[ f ] [ 0/0. 1/0. = ] unit-test
[ f ] [ 0/0. -1/0. = ] unit-test
[ f ] [ 0/0. 0/0. = ] unit-test
[ f ] [ 1.0 0/0. = ] unit-test
[ f ] [ -1/0. 0/0. = ] unit-test
[ f ] [ 1/0. 0/0. = ] unit-test
[ f ] [ 0/0. 0/0. < ] unit-test
[ f ] [ 0/0. 1.0 < ] unit-test
[ f ] [ 0/0. 1/0. < ] unit-test
[ f ] [ 0/0. -1/0. < ] unit-test
[ f ] [ 0/0. 0/0. <= ] unit-test
[ f ] [ 0/0. 1.0 <= ] unit-test
[ f ] [ 0/0. 1/0. <= ] unit-test
[ f ] [ 0/0. -1/0. <= ] unit-test
[ f ] [ 0/0. 0/0. > ] unit-test
[ f ] [ 1.0 0/0. > ] unit-test
[ f ] [ -1/0. 0/0. > ] unit-test
[ f ] [ 1/0. 0/0. > ] unit-test
[ f ] [ 0/0. 0/0. >= ] unit-test
[ f ] [ 1.0 0/0. >= ] unit-test
[ f ] [ -1/0. 0/0. >= ] unit-test
[ f ] [ 1/0. 0/0. >= ] unit-test