Added some basic echo functionality
This commit is contained in:
parent
63170fd0de
commit
70a6beb8b9
17 changed files with 70 additions and 448 deletions
|
@ -2,17 +2,12 @@
|
|||
-behaviour(supervisor).
|
||||
|
||||
%% API
|
||||
-export([start/1, start_link/1]).
|
||||
-export([start_link/1]).
|
||||
|
||||
%% Supervisor callbacks
|
||||
-export([init/1]).
|
||||
-define(SERVER, ?MODULE).
|
||||
|
||||
start(Port) ->
|
||||
[FirstArg] = Port,
|
||||
{IntPort, _} = string:to_integer(FirstArg),
|
||||
start_link(IntPort).
|
||||
|
||||
start_link(Port) ->
|
||||
supervisor:start_link({local, ?SERVER}, ?MODULE, [Port]).
|
||||
|
||||
|
@ -29,7 +24,7 @@ init([Port]) ->
|
|||
permanent,
|
||||
2000,
|
||||
worker,
|
||||
[ggs_dispatcher]
|
||||
[ggs_coordinator]
|
||||
},
|
||||
Children = [Dispatcher, Coordinator],
|
||||
|
||||
|
|
Reference in a new issue