1 USING: unicode.case tools.test namespaces ;
7 [ "Hello How Are You? I'M Good" ] [ "hEllo how ARE yOU? I'm good" >title ] unit-test
8 [ "FUSS" ] [ "Fu\u0000DF" >upper ] unit-test
9 [ "\u0003C3\u0003C2" ] [ "\u0003A3\u0003A3" >lower ] unit-test
10 [ t ] [ "hello how are you?" lower? ] unit-test
13 [ "i\u000131i \u000131jj" ] [ "i\u000131I\u000307 IJj" >lower ] unit-test
14 ! [ "I\u00307\u000131i Ijj" ] [ "i\u000131I\u000307 IJj" >title ] unit-test
15 [ "I\u000307II\u000307 IJJ" ] [ "i\u000131I\u000307 IJj" >upper ] unit-test
17 ! Lithuanian casing tests