anchor.diff:  
   handle_cast(Msg, State) ->
       logger:log(error, "TCP connection: Received unknown gen_server cast : ~p", [Msg]),
  -    {noreply, State}.
  +    {noreply, State, State#state.timeout}.
   
   
   %%--------------------------------------------------------------------
  
positive.code: 
  handle_info(Info, State) ->
      logger:log(debug, "TCP connection: Received unknown gen_server info :~n~p", [Info]),
      {noreply, State}.
  
  %%--------------------------------------------------------------------
  %% Function: terminate(Reason, State)
  
negative.code: %% Returns : any (ignored by gen_server)
  %%--------------------------------------------------------------------
  terminate(normal, _State) ->
      normal;
  terminate(Reason, _State) ->
      logger:log(error, "TCP connection: Terminating for some other reason than 'normal' : ~n~p",
  	       [Reason]),
      Reason.
  
  %%--------------------------------------------------------------------
  %% Function: code_change(OldVsn, State, Extra)
  