network-transport-tests 0.2.4.3 → 0.3.0

raw patch · 2 files changed

+9/−5 lines, 2 filesdep ~random

Dependency ranges changed: random

Files

• network-transport-tests.cabal +4/−3
• src/Network/Transport/Tests.hs +5/−2

@@ -1,5 +1,5 @@ name:                network-transport-tests-version:             0.2.4.3+version:             0.3.0 synopsis:            Unit tests for Network.Transport implementations -- description: homepage:            http://haskell-distributed.github.com@@ -10,7 +10,7 @@ copyright:           Well-Typed LLP category:            Network build-type:          Simple-cabal-version:       >=1.8+cabal-version:       >=1.10  Source-Repository head   Type:     git@@ -31,7 +31,8 @@                        ansi-terminal >= 0.5   hs-source-dirs:      src   ghc-options:         -Wall -fno-warn-unused-do-bind-  extensions:          CPP,+  default-language:    Haskell2010+  default-extensions:  CPP,                        ExistentialQuantification,                        FlexibleInstances,                        DeriveDataTypeable,

@@ -1043,9 +1043,12 @@  -- Transport tests testTransport :: IO (Either String Transport) -> IO ()-testTransport newTransport = do+testTransport = testTransportWithFilter (const True)++testTransportWithFilter :: (String -> Bool) -> IO (Either String Transport) -> IO ()+testTransportWithFilter p newTransport = do   Right transport <- newTransport-  runTests+  runTests $ filter (p . fst)     [ ("PingPong",              testPingPong transport numPings)     , ("EndPoints",             testEndPoints transport numPings)     , ("Connections",           testConnections transport numPings)