anchor.diff:  
   send_chunked_body_part(_State, _Buffer, Window, 0) -> 
       Window;
  -send_chunked_body_part(
  - State = #client_state{requester = Pid}, Buffer, 0, Size) ->
  +send_chunked_body_part(State = #client_state{requester = Pid}, Buff, 0, Size) ->
       receive
  -        {ack, Pid} -> send_chunked_body_part(State, Buffer, 1, Size);
  -        {'DOWN', _, process, Pid, _} -> exit(normal)
  +        {ack, Pid} ->
  +            send_chunked_body_part(State, Buff, 1, Size);
  +        {'DOWN', _, process, Pid, _} ->
  +            exit(normal)
       end;
   send_chunked_body_part(#client_state{requester = Pid}, Buffer, Window, _Size) ->
  -    Pid ! {body_part, self(), preformat(Buffer)},
  +    Pid ! {body_part, self(), list_to_binary(lists:reverse(Buffer))},
       receive
           {ack, Pid} ->  Window; 
           {'DOWN', _, process, Pid, _} -> exit(normal)
       after 0 ->
           lhttpc_lib:dec(Window)
       end.
  -            
  -preformat(Buffer) when is_list(Buffer) -> list_to_binary(lists:reverse(Buffer)).
   
   read_chunked_body(Socket, Ssl, Hdrs, Chunks) ->
       case read_chunk_size(Socket, Ssl) of
  
positive.code:     check_infinite_response(Vsn, Hdrs),
      read_partial_infinite_body(State, Hdrs, State#client_state.download_window);
  read_partial_body(State, _Vsn, Hdrs, {fixed_length, ContentLength}) ->
      read_partial_finite_body(State, Hdrs, ContentLength, 
          State#client_state.download_window).
      
  read_body(_Vsn, Hdrs, Ssl, Socket, chunked) ->
      read_chunked_body(Socket, Ssl, Hdrs, []);
  read_body(Vsn, Hdrs, Ssl, Socket, infinite) ->
  
negative.code:         {error, {http_error, Data}} ->
              erlang:error({bad_trailer, Data})
      end.
  
  read_trailers(Socket, Ssl, Hdrs) ->
      lhttpc_sock:setopts(Socket, [{packet, httph}], Ssl),
      case lhttpc_sock:recv(Socket, Ssl) of
  