daniel/blog.kempkens.io
1
0
Fork 0
Code Activity

Fix binary_join

Browse source
This commit is contained in:
Daniel Kempkens 2014-07-14 21:32:28 +02:00
parent 482aba3a03
commit 01e0266dba
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
_posts/2014-02-16-joining-a-list-of-binaries-in-erlang.md
View file

@ -23,9 +23,8 @@ binary_join([], _Sep) ->
<<>>;
binary_join([Part], _Sep) ->
Part;
binary_join(List, Sep) ->
InitAcc = hd(List),
lists:foldr(fun (Value, Acc) -> <<Acc/binary, Sep/binary, Value/binary>> end, InitAcc, tl(List)).
binary_join([Head|Tail], Sep) ->
lists:foldl(fun (Value, Acc) -> <<Acc/binary, Sep/binary, Value/binary>> end, Head, Tail).
{% endhighlight %}
It works just like you would expect: