-module(monitor).
-compile(export_all).


start() ->
	spawn(monitor, restarter, []).

restarter() ->
	process_flag(trap_exit, true),
	Pid = spawn_link(fun() -> double1:start() end), %spawn_link(double, start, [])
	io:format("aaaaa~n"),
	receive
		{'EXIT', Pid, normal} ->
			ok;
		{'EXIT', Pid, shutdown} ->
			ok;
		X  ->
			io:format("~p~n",[X])
	end.