anchor.diff:          _ ->
               {reply, {error, 'EOF'}, State}
       end;
  -
  -handle_call({set_http_options, HTTPOptions}, _From, State) ->
  -    {reply, ok, State#http_transport{http_options = HTTPOptions}};
   
   handle_call(flush, _From, State) ->
       {Response, State1} = do_flush(State),
  
positive.code: %% gen_server callbacks
  %%====================================================================
  
  init({Host, Path}) ->
      {ok, #http_transport{host = Host,
                           path = Path,
                           read_buffer = [],
                           write_buffer = [],
                           http_options = []}}.
  
  handle_call({write, Data}, _From, State = #http_transport{write_buffer = WBuf}) ->
      {reply, ok, State#http_transport{write_buffer = [WBuf, Data]}};
  
negative.code: -behaviour(thrift_transport).
  
  %% API
  -export([new/2, new/3]).
  
  %% gen_server callbacks
  -export([init/1,
  