anchor.diff:                        supervisor:start_child(ServerName, WantSpec),
                         ok
                 end;
  -         ({mc_pool, Pid, _, _}) ->
  +         ({{mc_pool, _}, Pid, _, _}) ->
                 mc_pool:reconfig(Pid, Name, PoolConfig),
                 ok;
            (_) -> ok
  
positive.code:     {ok, {{rest_for_one, 3, 10}, Children}}.
  
  child_spec_pool(Name, _PoolConfig) ->
      {mc_pool, {mc_pool, start_link, [Name]},
       permanent, 10, worker, []}.
  
  child_spec_accept(Name, PoolConfig) ->
  
negative.code:     Env = {mc_server_detect,
             mc_server_detect,
             {mc_pool, Name}},
      Args = [PortNum, AddrStr, Env],
      {{mc_accept, Args}, {mc_accept, start_link, Args},
       temporary, 10, worker, []}.
  
  reconfig(Name) ->
  