Current section

Files

Jump to
bpe src bpe_sup.erl
Raw

src/bpe_sup.erl

-module(bpe_sup).
-author('Maxim Sokhatsky').
-description('BPE Supervisor').
-include("bpe.hrl").
-behaviour(supervisor).
-compile(export_all).
-export([start_link/0]).
-export([init/1]).
opt() -> [ set, named_table, { keypos, 1 }, public ].
tables() -> [ processes ].
start_link() -> supervisor:start_link({local, ?MODULE}, ?MODULE, []).
init([]) -> [ ets:new(T,opt()) || T <- tables() ],
{ ok, { { one_for_one, 5, 10 }, [] } }.