]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/unicode/case/case-tests.factor
use radix literals
[factor.git] / basis / unicode / case / case-tests.factor
index 76fe0088e8743e1273ee5cd89ffa6a7dc320bff1..a91667ede3994c82af0a8eb26d9f98e476fc104a 100644 (file)
@@ -20,8 +20,8 @@ IN: unicode.case.tests
     "lt" locale set
     [ f ] [ i-dot? ] unit-test
     [ t ] [ lithuanian? ] unit-test
-    [ "i\u000307\u000300" ] [ HEX: CC 1string nfd >lower ] unit-test
-    [ "\u00012f\u000307" ] [ HEX: 12E 1string nfd >lower nfc ] unit-test
+    [ "i\u000307\u000300" ] [ 0xCC 1string nfd >lower ] unit-test
+    [ "\u00012f\u000307" ] [ 0x12E 1string nfd >lower nfc ] unit-test
     [ "I\u000300" ] [ "i\u000307\u000300" >upper ] unit-test
 !    [ "I\u000300" ] [ "i\u000307\u000300" >title ] unit-test
 ] with-scope