20 lines
445 B
Erlang
20 lines
445 B
Erlang
-module(ggs_sup).
|
|
-behaviour(supervisor).
|
|
|
|
%% API
|
|
-export([start_link/0]).
|
|
|
|
%% Supervisor callbacks
|
|
-export([init/1]).
|
|
-define(SERVER, ?MODULE).
|
|
|
|
start_link() ->
|
|
supervisor:start_link({local, ?SERVER}, ?MODULE, []).
|
|
|
|
init([]) ->
|
|
Server = {ggs_server, {ggs_server, start_link, []},
|
|
permanent, 2000, worker, [ggs_server]},
|
|
Children = [Server],
|
|
RestartStrategy = {one_for_one, 0, 1},
|
|
{ok, {RestartStrategy, Children}}.
|
|
|