Compare commits
2 Commits
64444bbc81
...
440aee7536
Author | SHA1 | Date | |
---|---|---|---|
Jonathan Lamothe | 440aee7536 | ||
Jonathan Lamothe | 63702be1e7 |
|
@ -48,7 +48,7 @@ import qualified Data.ByteString.Lazy as BSL
|
|||
import Data.Connection (Connection, source)
|
||||
import qualified Data.Text as T
|
||||
import Data.Text.Encoding (decodeUtf8')
|
||||
import System.IO.Streams as S
|
||||
import qualified System.IO.Streams as S
|
||||
|
||||
import Network.Gemini.Capsule.Encoding
|
||||
import Network.Gemini.Capsule.Types
|
||||
|
|
|
@ -97,7 +97,7 @@ readMaxSpec = describe "readMax" $ mapM_
|
|||
readMax maxLen conn `shouldReturn` expect
|
||||
)
|
||||
|
||||
-- description, max length, connection, expected
|
||||
-- description, max length, connection, expected
|
||||
[ ( "single input", 1024, singleConn, Just singleBS )
|
||||
, ( "multi input", 1024, multiConn, Just multiBS )
|
||||
, ( "long input", longLen, longConn, Just longBS )
|
||||
|
|
Loading…
Reference in New Issue
Block a user