Convert to a pool of workers

ingwinlu · Feb 6, 2016 · 048b996 · 048b996
1 parent 06e2b6d
commit 048b996
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 3 deletions.
diff --git a/Makefile b/Makefile
@@ -2,6 +2,8 @@ PROJECT = wpool_broadcast
 PROJECT_DESCRIPTION = New project
 PROJECT_VERSION = 0.0.1
 
+DEPS = worker_pool
+
 # Whitespace to be used when creating files from templates.
 SP = 4
 

diff --git a/src/broadcast.erl b/src/broadcast.erl
@@ -2,7 +2,7 @@
 -behaviour(gen_server).
 
 %% API.
--export([start_link/0, bump/1]).
+-export([start_pool/0, bump/0, bump/1]).
 %% gen_server.
 -export([init/1, handle_call/3, handle_cast/2, handle_info/2,
          terminate/2, code_change/3]).
@@ -13,8 +13,16 @@
 
 %% API.
 
-start_link() ->
-    gen_server:start_link(?MODULE, [], []).
+start_pool() ->
+    wpool:start_pool(
+      ?MODULE, [
+                {workers, 10},
+                {worker, {?MODULE, []}}
+               ]
+    ).
+
+bump() ->
+    wpool:cast(?MODULE, bump).
 
 bump(Pid) ->
     gen_server:cast(Pid, bump).