factor/core/strings/parser/parser-tests.factor

15 lines
574 B
Factor

USING: strings.parser tools.test ;
IN: strings.parser.tests
[ "Hello\n\rworld" ] [ "Hello\\n\\rworld" unescape-string ] unit-test
[ "Hello\n\rworld" ] [ "Hello\n\rworld" ] unit-test
[ "Hello\n\rworld" ] [ """Hello\n\rworld""" ] unit-test
[ "Hello\n\rworld\n" ] [ "Hello\n\rworld
" ] unit-test
[ "Hello\n\rworld" "hi" ] [ "Hello\n\rworld" "hi" ] unit-test
[ "Hello\n\rworld" "hi" ] [ """Hello\n\rworld""" """hi""" ] unit-test
[ "Hello\n\rworld\n" "hi" ] [ """Hello\n\rworld
""" """hi""" ] unit-test
[ "Hello\n\rworld\"" "hi" ] [ """Hello\n\rworld\"""" """hi""" ] unit-test