@@ -291,7 +291,7 @@ newtype HTTP2Data = HTTP2Data {
291291 --
292292 -- Since: 3.2.7
293293 http2dataPushPromise :: [PushPromise]
294− }
294+ } deriving (Eq,Show)
295295
296296-- | Default HTTP/2 specific data.
297297--
@@ -325,7 +325,7 @@ data PushPromise = PushPromise {
325325 --
326326 -- Since: 3.2.7
327327 , promisedWeight :: Weight
328− }
328+ } deriving (Eq,Ord,Show)
329329
330330-- | Default push promise.
331331--