remove vestigial flatify
function
This commit is contained in:
parent
f6641a445f
commit
3625aaeb66
1 changed files with 1 additions and 9 deletions
|
@ -23,7 +23,7 @@
|
|||
|
||||
-module(jsx_to_term).
|
||||
|
||||
-export([to_term/2, flatify/1]).
|
||||
-export([to_term/2]).
|
||||
-export([init/1, handle_event/2]).
|
||||
-export([
|
||||
start_term/1,
|
||||
|
@ -242,14 +242,6 @@ get_value({Value, _Config}) -> Value;
|
|||
get_value(_) -> erlang:error(badarg).
|
||||
|
||||
|
||||
%% we know the structure of our accumulator so we can safely
|
||||
%% flatten like this
|
||||
flatify(List) -> flatify(List, []).
|
||||
%% head of list should always be []
|
||||
flatify([], Tail) -> Tail;
|
||||
flatify([H, T], Tail) -> flatify(H, [T] ++ Tail).
|
||||
|
||||
|
||||
|
||||
%% eunit tests
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue