Test fixes

db4
Slava Pestov 2008-02-02 15:00:05 -06:00
parent 61a9adb2bb
commit b381c123dd
2 changed files with 5 additions and 7 deletions

View File

@ -21,9 +21,9 @@ IN: temporary
[ "hello\\backslash" unparse ]
unit-test
[ "\"\\u123456\"" ]
[ "\u123456" unparse ]
unit-test
! [ "\"\\u123456\"" ]
! [ "\u123456" unparse ]
! unit-test
[ "\"\\e\"" ]
[ "\e" unparse ]

View File

@ -88,8 +88,6 @@ unit-test
! Make sure aux vector is not shared
[ "\udeadbe" ] [
"\udeadbe" clone
CHAR: \u123456 over clone set-first
"\udeadbe" clone
CHAR: \u123456 over clone set-first
] unit-test