anchor.diff:      lager:debug("[~p] Send Body Stream ~p",
                   [Conn#connection.type, StreamId]),
       Stream = get_stream(StreamId, Conn#connection.streams),
  -    lager:info("Stream: ~p", [Stream]),
       {NewSWS, NewS} =
           s_send_what_we_can(Conn#connection.send_window_size,
                              Conn#connection.send_settings#settings.max_frame_size,
  
positive.code:             _ ->
                  {SSWS, stream}
          end,
      lager:debug("s_send: ~p, ~p, ~p", [SWS, SSWS, ExitStrategy]),
  
      {Frame, SentBytes, NewS} =
          case MaxToSend > QueueSize of
  
negative.code:                    queued_data=Rest,
                     send_window_size=SSWS-MaxToSend}}
          end,
  
      _Sent = http2_stream:send_frame(Stream#stream.pid, Frame),
  
  