-
Notifications
You must be signed in to change notification settings - Fork 9
/
Copy pathTest.hs
42 lines (34 loc) · 840 Bytes
/
Test.hs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
{-# LANGUAGE CPP #-}
module Main
( main
) where
import Test.Hspec
import Test.Hspec.Runner
#ifdef MIN_VERSION_hspec_jenkins
import Test.Hspec.Formatters.Jenkins (xmlFormatter)
#endif
import qualified CountLog
import qualified Error
import qualified Reader
import qualified Reflection
import qualified State
import qualified Sink
import qualified Writer
import qualified WordCount
spec :: Spec
spec = do
describe "CountLog" CountLog.spec
describe "Error" Error.spec
describe "Reader" Reader.spec
describe "Reflection" Reflection.spec
describe "State" State.spec
describe "Sink" Sink.spec
describe "Writer" Writer.spec
describe "WordCount" WordCount.spec
main :: IO ()
main = do
let cfg = defaultConfig
#ifdef MIN_VERSION_hspec_jenkins
{ configFormatter = Just xmlFormatter }
#endif
hspecWith cfg spec