fix tests

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) ->
     [
         <<"[{}">>,

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]}])}
     ]}.