umgeher/jsx
0
Fork 0
Code Issues Pull requests Activity

make sure `jsx_encoder:encode/2' dispatches recursive calls correctly

Browse source
This commit is contained in:
alisdair sullivan 2013-11-13 02:29:44 +00:00
parent 5db1d9cc05
commit 5fcd4644bf
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/jsx_encoder.erl
View file

@ -43,9 +43,13 @@ encode([], _EntryPoint) -> [start_array, end_array];
encode([{}], _EntryPoint) -> [start_object, end_object];
encode([{_, _}|_] = Term, EntryPoint) ->
lists:flatten([start_object] ++ [ EntryPoint:encode(T) || T <- unzip(Term) ] ++ [end_object]);
lists:flatten(
[start_object] ++ [ EntryPoint:encode(T, EntryPoint) || T <- unzip(Term) ] ++ [end_object]
);
encode(Term, EntryPoint) when is_list(Term) ->
lists:flatten([start_array] ++ [ EntryPoint:encode(T) || T <- Term ] ++ [end_array]);
lists:flatten(
[start_array] ++ [ EntryPoint:encode(T, EntryPoint) || T <- Term ] ++ [end_array]
);
encode(Else, _EntryPoint) -> [Else].