encoding Continuation frame correctly.
commit92372bdeb188bf6a873e46a2882b08b60274155a
authorKazu Yamamoto <kazu@iij.ad.jp>
dateTue 16 Feb 2016, 14:13 (11 years ago)
parent73123e9
warp/Network/Wai/Handler/Warp/HTTP2/Sender.hs+1
@@ -213,6 +213,7 @@ frameSender ctx@Context{outputQ,controlQ,connectionWindow,encodeDynamicTable}
213213 flushN $ kvlen + frameHeaderLength
214214 -- Now off is 0
215215 (hs', kvlen') <- hpackEncodeHeaderLoop ctx bufHeaderPayload headerPayloadLim hs
216+ when (hs == hs') $ E.throwIO $ ConnectionError CompressionError "cannot compress the header"
216217 let flag = case hs' of
217218 [] -> setEndHeader defaultFlags
218219 _ -> defaultFlags