diff --git a/test/jiffy_07_compound_tests.erl b/test/jiffy_07_compound_tests.erl index 7a811db..3eadf19 100644 --- a/test/jiffy_07_compound_tests.erl +++ b/test/jiffy_07_compound_tests.erl @@ -9,7 +9,8 @@ compound_success_test_() -> - [gen(ok, Case) || Case <- cases(ok)]. + [gen(ok, Case) || Case <- cases(ok)] ++ + [gen(special_encoding, Case) || Case <- cases(special_encoding)]. compound_failure_test_() -> @@ -24,6 +25,11 @@ gen(ok, {J1, E, J2}) -> {"Encode", ?_assertEqual(J2, enc(E))} ]}; +gen(special_encoding, {J, E}) -> + {msg("~s", [J]), [ + {"Encode", ?_assertEqual(J, enc(E))} + ]}; + gen(error, J) -> {msg("Error: ~s", [J]), [ ?_assertThrow({error, _}, dec(J)) @@ -53,6 +59,11 @@ cases(ok) -> } ]; +cases(special_encoding) -> + [ + {<<"{\"123\":\"foo\"}">>, {[{123, <<"foo">>}]}} + ]; + cases(error) -> [ <<"[{}">>, diff --git a/test/jiffy_12_error_tests.erl b/test/jiffy_12_error_tests.erl index a7d4ed6..93471d7 100644 --- a/test/jiffy_12_error_tests.erl +++ b/test/jiffy_12_error_tests.erl @@ -71,13 +71,10 @@ enc_invalid_object_member_key_test_() -> E1 = {1, true}, {"invalid_object_member_key", [ {"Bad string", enc_error(Type, <<143>>, {[{<<143>>, true}]})}, - {"Basic", enc_error(Type, 1, {[{1, true}]})}, {"Basic", enc_error(Type, [1], {[{[1], true}]})}, {"Basic", enc_error(Type, {[{foo,bar}]}, {[{{[{foo,bar}]}, true}]})}, {"Second", enc_error(Type, 1, {[{bar, baz}, E1]})}, - {"Nested", enc_error(Type, 1, {[{bar,{[E1]}}]})}, {"Nested", enc_error(Type, 1, {[{bar,{[{baz, 1}, E1]}}]})}, - {"In List", enc_error(Type, 1, [{[E1]}])}, {"In List", enc_error(Type, 1, [{[{bang, true}, E1]}])} ]}.