use radix literals

[factor.git] / basis / io / encodings / shift-jis / shift-jis-tests.factor

diff --git a/basis/io/encodings/shift-jis/shift-jis-tests.factor b/basis/io/encodings/shift-jis/shift-jis-tests.factor
index fc15fab819144d760b87fe5c6b39a3156f8eee35..0f91b233f08518626e26c1009d5f4147d2b41b1f 100644 (file)
--- a/basis/io/encodings/shift-jis/shift-jis-tests.factor
+++ b/basis/io/encodings/shift-jis/shift-jis-tests.factor
@@ -7,10 +7,10 @@ IN: io.encodings.shift-jis.tests
 [ "" ] [ "" shift-jis decode >string ] unit-test
 [ "" ] [ "" shift-jis encode >string ] unit-test
 [ { CHAR: replacement-character } shift-jis encode ] must-fail
-[ "ab¥ｨ" ] [ { CHAR: a CHAR: b HEX: 5C HEX: A8 } shift-jis decode ] unit-test
-[ { CHAR: a CHAR: b HEX: 5C HEX: A8 } ] [ "ab¥ｨ" shift-jis encode >array ] unit-test
-[ "ab\\ｨ" ] [ { CHAR: a CHAR: b HEX: 5C HEX: A8 } windows-31j decode ] unit-test
-[ { CHAR: a CHAR: b HEX: 5C HEX: A8 } ] [ "ab\\ｨ" windows-31j encode >array ] unit-test
+[ "ab¥ｨ" ] [ { CHAR: a CHAR: b 0x5C 0xA8 } shift-jis decode ] unit-test
+[ { CHAR: a CHAR: b 0x5C 0xA8 } ] [ "ab¥ｨ" shift-jis encode >array ] unit-test
+[ "ab\\ｨ" ] [ { CHAR: a CHAR: b 0x5C 0xA8 } windows-31j decode ] unit-test
+[ { CHAR: a CHAR: b 0x5C 0xA8 } ] [ "ab\\ｨ" windows-31j encode >array ] unit-test
 [ "\u000081\u0000c8" ] [ CHAR: logical-and 1string windows-31j encode >string ] unit-test
 [ "\u000081\u0000c8" ] [ CHAR: logical-and 1string shift-jis encode >string ] unit-test
 [ { CHAR: logical-and } ] [ "\u000081\u0000c8" windows-31j decode >array ] unit-test