anchor.diff:  
   -spec send_request(pid(), hpack:headers(), binary()) -> ok.
   send_request(Pid, Headers, Body) ->
  -    gen_fsm:send_all_state_event(Pid, {send_request, self(), Headers, Body}),
  +    gen_fsm:sync_send_all_state_event(Pid, {send_request, self(), Headers, Body}, infinity),
       ok.
   
   -spec get_peer(pid()) ->
  
positive.code:         Pid ->
              gen_fsm:send_event(Pid, {recv_data, Frame})
      end.
  
negative.code:             streams=Streams,
              next_available_stream_id=NextId
          }=Conn) ->
      case send_request(NextId, NotifyPid, Conn, Streams, Headers, Body) of
          {ok, GoodStreamSet} ->
              {next_state, StateName, Conn#connection{
                  next_available_stream_id=NextId+2,
                  streams=GoodStreamSet
              }};
          {error, _Code} ->
              {next_state, StateName, Conn}
      end;
  
  handle_event({send_promise, StreamId, NewStreamId, Headers},
               StateName,
  