anchor.diff:  			Pid;
   		_ ->
   			lager:error("Failed to look up TCP cookie, disconnecting client."),
  -			exit("Failed to lookup TCP cookie.")
  +			exit(tcp_cookie_error)
   	end,
   	gen_server:cast(ClientPid, {tcp_connect, TcpProto}),
   
  
positive.code: 	lager:error("Control message received over TCP! Someone's doing something bad! Message: ~p", [Message]),
  
  	% Drop the client! It's either trying to do something bad, or there's a bug in it's code. Either way, die in a fire.
  	exit("Control message received over TCP."),
  	{noreply, State};
  
  
  
negative.code: 	case State#client_state.tcp_proto of
  		undefined ->
  			%TODO: Inform the client, somehow, of the reason.
  			exit(tcp_timeout);
  		_ ->
  			ok
  	end,
  