class Async::HTTP::Protocol::HTTP11

def write_chunked_body(body)
	write_persistent_header
	@stream.write("transfer-encoding: chunked\r\n\r\n")
	
	body.each do |chunk|
		next if chunk.size == 0
		
		@stream.write("#{chunk.bytesize.to_s(16).upcase}\r\n")
		@stream.write(chunk)
		@stream.write(CRLF)
		@stream.flush
	end
	
	@stream.write("0\r\n\r\n")
	@stream.flush
end