steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/basis/ascii/ascii-tests.factor

20 lines
559 B
Factor
Raw Normal View History

Fix unit tests and fix string clone
2008-02-01 17:02:02 -05:00
USING: ascii tools.test sequences kernel math ;
extra changes: index* -> index-from last-index* -> last-index-from 1 tail -> rest 1 tail-slice -> rest-slice subset -> filter prepose find* -> find-from find-last* -> find-last-from before, after generic, < for integers make between? work for timestamps
2008-04-26 00:17:08 -04:00
IN: ascii.tests
Fix unit tests and fix string clone
2008-02-01 17:02:02 -05:00
[ t ] [ CHAR: a letter? ] unit-test
[ f ] [ CHAR: A letter? ] unit-test
[ f ] [ CHAR: a LETTER? ] unit-test
[ t ] [ CHAR: A LETTER? ] unit-test
[ t ] [ CHAR: 0 digit? ] unit-test
[ f ] [ CHAR: x digit? ] unit-test
[ 4 ] [
0 "There are Four Upper Case characters"
[ LETTER? [ 1+ ] when ] each
] unit-test
Privatizing unicode.case:ch>{lower,upper,title}
2009-01-08 20:07:46 -05:00
[ t f ] [ CHAR: \s ascii? 400 ascii? ] unit-test
[ "HELLO HOW ARE YOU?" ] [ "hellO hOw arE YOU?" >upper ] unit-test
[ "i'm good thx bai" ] [ "I'm Good THX bai" >lower ] unit-test