anchor.diff:      end,
       Module:close(Socket).
   
  -slow_response(Module, Socket, _, _, _) ->
  +very_slow_response(Module, Socket, _, _, _) ->
       timer:sleep(1000),
       Module:send(
           Socket,
  
positive.code:     ?assertEqual(<<>>, body(ThirdResponse)).
  
  request_timeout() ->
      Port = start(gen_tcp, [fun slow_response/5]),
      URL = "http://localhost:" ++ integer_to_list(Port) ++ "/slow",
      ?assertEqual({error, timeout}, lhttpc:request(URL, get, [], 50)).
  
  
negative.code:     {setup, fun start_app/0, fun stop_app/1, [
              ?_test(simple_get()),
              ?_test(empty_get()),
              ?_test(get_with_mandatory_hdrs()),
              ?_test(no_content_length_get()),
              ?_test(connection_close()),
              ?_test(simple_put()),
  