diff options
| author | Magnus Ahltorp <map@kth.se> | 2015-10-28 16:00:32 +0100 |
|---|---|---|
| committer | Linus Nordberg <linus@nordu.net> | 2015-11-11 13:32:37 +0100 |
| commit | 5832111169e899fe114947236a3b5b845d4aa9bd (patch) | |
| tree | 3bc04528d20d7ac1563e32e5290a08c286a80fe0 /src/util.erl | |
| parent | e77934418082facf6c4b3566100b108b26e4119d (diff) | |
Make check_entries parallelism configurable
Diffstat (limited to 'src/util.erl')
| -rw-r--r-- | src/util.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/util.erl b/src/util.erl index 8a8152a..f58cb4b 100644 --- a/src/util.erl +++ b/src/util.erl @@ -124,6 +124,8 @@ parallel_map_loop([Item|Rest], [FreeChild|FreeChildren], WorkingChildren, Acc) - parallel_map_loop(Rest, FreeChildren, queue:in(FreeChild, WorkingChildren), Acc). +parallel_map(Fun, List, 1) -> + lists:map(Fun, List); parallel_map(Fun, List, Parallel) -> ParentPid = self(), ChildPids = lists:map(fun(N) -> |