-
Notifications
You must be signed in to change notification settings - Fork 0
/
otp_sup
48 lines (33 loc) · 1.34 KB
/
otp_sup
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
# -*- mode: snippet; require-final-newline: nil -*-
# name: OTP Supervisor
# key: otp_sup
# --
-module(${1:`(car (last (split-string (file-name-sans-extension (buffer-file-name (window-buffer (minibuffer-selected-window)))) "/")))`}).
-behaviour(supervisor).
%% API
-export([start_link/0]).
%% Supervisor callbacks
-export([init/1]).
-define(SERVER, ?MODULE).
%%------------------------------------------------------------------------------
%% API functions
%%------------------------------------------------------------------------------
start_link() ->
supervisor:start_link({local, ?SERVER}, ?MODULE, []).
%%------------------------------------------------------------------------------
%% Supervisor callbacks
%%------------------------------------------------------------------------------
init([]) ->
SupFlags = #{strategy => one_for_one,
intensity => 1,
period => 5},
AChild = #{id => 'AName',
start => {'AModule', start_link, []},
restart => permanent,
shutdown => 5000,
type => worker,
modules => ['AModule']},
{ok, {SupFlags, [AChild]}}.
%%------------------------------------------------------------------------------
%% Internal functions
%%------------------------------------------------------------------------------