anchor.diff:  %%% Internal functions
   %%--------------------------------------------------------------------
   
  -spawn_acceptors(S) ->
  -    S.
  +spawn_acceptors(0, S) ->
  +    S;
  +spawn_acceptors(N, S) ->
  +    {ok, Pid} = acceptor:start_link(S#state.listen_socket),
  +    spawn_acceptors(N-1, S#state{acceptors = [Pid | S#state.acceptors]}).
  +
  
positive.code: %% Description: Handling all non call/cast messages
  %%--------------------------------------------------------------------
  handle_info(timeout, S) ->
      {noreply, spawn_acceptors(S)};
  handle_info(_Info, State) ->
      {noreply, State}.
  
  
negative.code: -export([init/1, handle_call/3, handle_cast/2, handle_info/2,
  	 terminate/2, code_change/3]).
  
  -record(state, { listen_socket = none,
  		 acceptors = []}).
  
  -define(SERVER, ?MODULE).
  -define(DEFAULT_AMOUNT_OF_ACCEPTORS, 5).
  
  %%====================================================================
  %% API
  