anchor.diff:      after 1000 ->
               ?MODULE:chunk_loop(Socket, Req, closed)
       end.
  +
  +
  +send_chunk(Socket, Data) ->
  +    Size = integer_to_list(iolist_size(Data), 16),
  +    Response = [Size, <<"\r\n">>, Data, <<"\r\n">>],
  +    gen_tcp:send(Socket, Response).
   
   
   
  
positive.code:             end;
  
          {chunk, Data} ->
              Size = integer_to_list(iolist_size(Data), 16),
              Response = [Size, <<"\r\n">>, Data, <<"\r\n">>],
              gen_tcp:send(Socket, Response),
              ?MODULE:chunk_loop(Socket, Req, open);
          {chunk, Data, From} ->
              Size = integer_to_list(iolist_size(Data), 16),
              Response = [Size, <<"\r\n">>, Data, <<"\r\n">>],
              case gen_tcp:send(Socket, Response) of
                  ok ->
                      From ! {self(), ok};
                  {error, closed} ->
  
negative.code:                     ok
              end;
  
          {chunk, UserHeaders, Initial} ->
              t(user_end),
  
              ResponseHeaders = [{<<"Transfer-Encoding">>, <<"chunked">>},
                                 connection(Req, UserHeaders)
                                 | UserHeaders],
              send_response(Socket, 200, ResponseHeaders, <<"">>, Callback),
              Initial =:= <<"">> orelse send_chunk(Socket, Initial),
  
              chunk_loop(Socket, Req),
  
  