anchor.diff:                      ok
               end;
   
  -        {chunk, UserHeaders} ->
  +        {chunk, UserHeaders, Initial} ->
               t(user_end),
   
               ResponseHeaders = [{<<"Transfer-Encoding">>, <<"chunked">>},
                                  connection(Req, UserHeaders)
                                  | UserHeaders],
  -            send_response(Socket, 200, ResponseHeaders, <<>>, Callback),
  +            send_response(Socket, 200, ResponseHeaders, <<"">>, Callback),
  +            Initial =:= <<"">> orelse send_chunk(Socket, Initial),
   
               chunk_loop(Socket, Req),
   
  
positive.code: 
      t(user_start),
      case execute_callback(Req, Callback) of
          {ResponseCode, UserHeaders, UserBody} ->
              t(user_end),
  
              ResponseHeaders = [
  
negative.code:             end;
  
          {chunk, Data} ->
              send_chunk(Socket, Data),
              ?MODULE:chunk_loop(Socket, Req, open);
          {chunk, Data, From} ->
              case send_chunk(Socket, Data) of
                  ok ->
                      From ! {self(), ok};
                  {error, closed} ->
  