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

cleaner unit-tests

db4
Doug Coleman 2008-11-22 20:34:25 -06:00
parent 35b7b74b97
commit 75c32bde5a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/splitting/splitting-tests.factor
View File

@ -13,8 +13,8 @@ IN: splitting.tests
[ "hello world" "." ] [ "hello world ." " " split1-last-slice [ >string ] bi@ ] unit-test
[ "hello-+world" "." ] [ "hello-+world-+." "-+" split1-last-slice [ >string ] bi@ ] unit-test
[ "goodbye" f ] [ "goodbye" " " split1-last-slice [ dup [ >string ] when ] bi@ ] unit-test
[ "" "" ] [ "great" "great" split1-last-slice [ >string ] bi@ ] unit-test
[ "goodbye" f ] [ "goodbye" " " split1-last-slice [ >string ] dip ] unit-test
[ "" f ] [ "great" "great" split1-last-slice [ >string ] dip ] unit-test
[ "and end" t ] [ "Beginning and end" "Beginning " ?head ] unit-test
[ "Beginning and end" f ] [ "Beginning and end" "Beginning x" ?head ] unit-test