anchor.diff:      %%
       %% If it sounds backwards, well, it is! :)
   
  -    parse_array([], {Chars, [placeholder | Cache]}, Cache, Kv).
  +    parse_array([], {Chars, put_obj(placeholder, Cache)},
  +		Cache, Kv).
   
   parse_array(Elems, C, OrigCache, Kv) ->
       get_token(C,
  
positive.code: 		  {Encoded, Cache3}  = encode(Elem, Cache2),
  		  {0, [Encoded, encode_nulls(NullCount) | Arr], Cache3}
  	  end,
  	  {0, [$a], [placholder | Cache]}, Props),
      {lists:reverse([$h , encode_nulls(NullCount) | Arr]), Cache1}.
  
  encode_nulls(0) -> [];
  
negative.code: test() ->
      Tests = [
  	     {1, "i1"},
  	     {1.1, "d1.10000"},
  	     {"foo", "s3:foo"},
  	     %% todo test utf8
  	     {null, "n"},
  