Packages

gen_cycle

1.0.3
1.0.4 1.0.3 1.0.2 1.0.1 0.0.3

Erlang behaviour for recurring events

HexDocs

Current section

Files

Jump to
Readme
5 Versions
0 Dependencies
Dependants
Files
Activity
gen_cycle src gen_cycle_sup.erl
Raw

src/gen_cycle_sup.erl 

-module(gen_cycle_sup).



-behaviour(supervisor).



-export([start_link/0]).

-export([start_child/1]).

-export([stop_child/1]).



-export([init/1]).



-define(CHILD(I, Type), {I, {I, start_link, []}, transient, 5000, Type, [I]}).



start_link() ->

    supervisor:start_link({local, ?MODULE}, ?MODULE, []).



start_child(Args) ->

    supervisor:start_child(?MODULE, Args).



stop_child(Pid) when is_pid(Pid) ->

    supervisor:terminate_child(?MODULE, Pid).



init([]) ->

    {ok, {{simple_one_for_one, 500, 10},

          [ ?CHILD(gen_cycle, worker) ]}}.