1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
module Main (main) where
-------------------------------------------------------------------------------
import Test.Tasty
-------------------------------------------------------------------------------
import qualified URI.ByteStringTests
import qualified URI.ByteStringQQTests
-------------------------------------------------------------------------------
main :: IO ()
main = defaultMain testSuite
testSuite :: TestTree
testSuite = testGroup "uri-bytestring"
[
URI.ByteStringTests.tests
, URI.ByteStringQQTests.tests
]
|
