rebar/inttest/erlc/extra-src/foo_sup.erl

%% -*- mode: erlang;erlang-indent-level: 4;indent-tabs-mode: nil -*-
%% ex: ts=4 sw=4 ft=erlang et
-module(foo_sup).

-behavior(supervisor).

-export([start_link/0,
         init/1]).

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

init(_Args) ->
    FooChild = {foo,{foo, start_link, []}, permanent, 5000, worker, [foo]},
    {ok,{{one_for_all,1,1}, [FooChild]}}.
Regression test for #249 2014-05-28 14:05:26 +07:00			`%% -- mode: erlang;erlang-indent-level: 4;indent-tabs-mode: nil --`
			`%% ex: ts=4 sw=4 ft=erlang et`
erlc: add test suite 2014-03-05 17:59:35 +01:00			`-module(foo_sup).`

			`-behavior(supervisor).`

			`-export([start_link/0,`
			`init/1]).`

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

			`init(_Args) ->`
			`FooChild = {foo,{foo, start_link, []}, permanent, 5000, worker, [foo]},`
			`{ok,{{one_for_all,1,1}, [FooChild]}}.`