basis/io/encodings/string/string-tests.factor

   1 ! Copyright (C) 2008 Daniel Ehrenberg.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: strings io.encodings.utf8 io.encodings.utf16
   4 io.encodings.string tools.test io.encodings.binary ;
   5 IN: io.encodings.string.tests
   6
   7 { "hello" } [ "hello" utf8 decode ] unit-test
   8 { B{ 0 1 22 255 } } [ B{ 0 1 22 255 } binary decode ] unit-test
   9 { "he" } [ "\0h\0e" utf16be decode ] unit-test
  10
  11 { "hello" } [ "hello" utf8 encode >string ] unit-test
  12 { "\0h\0e" } [ "he" utf16be encode >string ] unit-test