anchor.diff:  -define (MaxRestartTrial, 5).
   -define (MaxTimeBetweenRestartInSec, 10).
   -define (TcpTimeoutInSec, 2000).
  +-define(is_simple(Strategy), Strategy =:= simple_one_for_one).
  +-define(is_one_for_one(Strategy), Strategy =:= one_for_one).
   
   start_link() ->
     supervisor:start_link({local, ?MODULE}, ?MODULE, []).
  
positive.code: %%====================================================================
  %% Internal functions
  %%====================================================================
  -spec worker_restart_strategy()->{supervisor:strategy(), pos_integer(), pos_integer()}.
  worker_restart_strategy()->
    {simple_one_for_one, ?MaxRestartTrial, ?MaxTimeBetweenRestartInSec}.
  
  tcp_socket_server_spec()->
    {the_tcp_socket_server,
  
negative.code: 	tcp_socket_server_spec(),
  	proxy_server_spec()
  	]),
    {ok, {worker_restart_strategy('one_for_one'), 
  	WorkerSpecSet}};
  
  init([Module]) ->
    ProxySrv = {undefined,{Module,start_link,[]},temporary,2000,worker,[]},
    {ok, {{worker_restart_strategy('simple_one_for_one'), [ProxySrv]}}.
  
  stop(_Args) ->
    ok.
  