diff options
| author | Magnus Ahltorp <map@kth.se> | 2015-10-28 16:00:32 +0100 |
|---|---|---|
| committer | Magnus Ahltorp <map@kth.se> | 2015-10-28 16:00:32 +0100 |
| commit | 40ff39f827f4ee83dc5ecd198ca9f92ed55dcb20 (patch) | |
| tree | 230d9b791fe7e22cbe25763de71689a5372be980 /src/util.erl | |
| parent | d03a5d7f6e5530e7b0504e491f36f2caf596302f (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) -> |