29a600b · typeable/wai

git.iko.soy/typeable/wai

localizing a type.

commit29a600b2762587d7518c975a41c9d285cdc0d847 authorKazu Yamamoto <kazu@iij.ad.jp> dateTue 21 Jul 2015, 11:52 (11 years ago) parentb3ef211

2 files changed+6−5

unifiedsplit

warp/Network/Wai/Handler/Warp/HTTP2/Sender.hs+6

@@ -37,6 +37,12 @@ import System.Posix.Types

3737

3838----------------------------------------------------------------

3939

40+data Leftover = LZero

41+ | LOne B.BufferWriter

42+ | LTwo BS.ByteString B.BufferWriter

43+

44+----------------------------------------------------------------

45+

4046unlessClosed :: Context -> Connection -> Stream -> IO () -> IO ()

4147unlessClosed ctx

4248 Connection{connSendAll}

warp/Network/Wai/Handler/Warp/HTTP2/Types.hs−5

@@ -13,7 +13,6 @@ import Control.Monad (void)

1313import Control.Reaper

1414import Data.ByteString (ByteString)

1515import qualified Data.ByteString as BS

16−import qualified Data.ByteString.Builder.Extra as B

1716import Data.IntMap.Strict (IntMap, IntMap)

1817import qualified Data.IntMap.Strict as M

1918import qualified Network.HTTP.Types as H

@@ -78,10 +77,6 @@ data Sync = SyncNone

7877data Aux = Oneshot Bool

7978 | Persist (TBQueue Sequence) (TVar Sync)

8079

81−data Leftover = LZero

82− | LOne B.BufferWriter

83− | LTwo ByteString B.BufferWriter

84−

8580----------------------------------------------------------------

8681

8782-- | The context for HTTP/2 connection.