anchor.diff:              ?_test(get_with_mandatory_hdrs()),
               ?_test(no_content_length()),
               ?_test(no_content_length_1_0()),
  +            ?_test(simple_head()),
  +            ?_test(simple_head_atom()),
  +            ?_test(delete_no_content()),
  +            ?_test(delete_content()),
  +            ?_test(options_content()),
  +            ?_test(options_no_content()),
               ?_test(server_connection_close()),
               ?_test(client_connection_close()),
               ?_test(pre_1_1_server_connection()),
  
positive.code:     Port = start(gen_tcp, [fun no_content_length_1_0/5]),
      URL = url(Port, "/no_cl"),
      {ok, Response} = lhttpc:request(URL, "GET", [], 1000),
      ?assertEqual({200, "OK"}, status(Response)),
      ?assertEqual(<<?DEFAULT_STRING>>, body(Response)).
  
  
negative.code:         ?DEFAULT_STRING
      ).
  
  head_response(Module, Socket, _Request, _Headers, _Body) ->
      Module:send(
          Socket,
          "HTTP/1.1 200 OK\r\n"
          "Server: Test server!\r\n\r\n"
      ).
  
  no_content_response(Module, Socket, _Request, _Headers, _Body) ->
      Module:send(
          Socket,
          "HTTP/1.1 204 OK\r\n"
          "Server: Test server!\r\n\r\n"
      ).
  
  empty_body(Module, Socket, _, _, _) ->
      Module:send(
          Socket,
  