50 lines
1.1 KiB
Plaintext
50 lines
1.1 KiB
Plaintext
note
|
||
description: "[
|
||
Eiffel tests that can be executed by testing tool.
|
||
]"
|
||
author: "EiffelStudio test wizard"
|
||
date: "$Date$"
|
||
revision: "$Revision$"
|
||
testing: "type/manual"
|
||
|
||
class
|
||
TEST_JSON_ENCODER
|
||
|
||
inherit
|
||
EQA_TEST_SET
|
||
|
||
feature -- Test routines
|
||
|
||
test_json_encoded_encoder
|
||
note
|
||
testing: "json-encoded"
|
||
do
|
||
test_json_encoded_encoding ({STRING_32}"il était une fois %"Ni & Hao%" (你好) \a\b\c")
|
||
test_json_encoded_encoding ({STRING_32}" it's `abc’ ")
|
||
test_json_encoded_encoding ({STRING_32}"tab%Tnew line%N %"double quote %"")
|
||
end
|
||
|
||
test_json_encoded_encoding (s: STRING_32)
|
||
local
|
||
u: STRING_32
|
||
e: STRING_8
|
||
b: JSON_ENCODER
|
||
do
|
||
create b
|
||
e := b.encoded_string (s)
|
||
u := b.decoded_string (e)
|
||
assert ("decoded encoded string is same", u ~ s)
|
||
end
|
||
|
||
note
|
||
copyright: "2011-2012, Eiffel Software and others"
|
||
license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
|
||
source: "[
|
||
Eiffel Software
|
||
5949 Hollister Ave., Goleta, CA 93117 USA
|
||
Telephone 805-685-1006, Fax 805-685-6869
|
||
Website http://www.eiffel.com
|
||
Customer support http://support.eiffel.com
|
||
]"
|
||
end
|