summaryrefslogtreecommitdiff
path: root/src/exe/Test.lhs
blob: 400192e44fb824130a4e16986e0ab37eeefa324e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Running tests
+++++++++++++

.. class:: nodoc

> import Test.HUnit
> import System.Exit (exitFailure, exitSuccess)
> import Codec.Pesto.Parse (test)
> import Codec.Pesto.Lint (test)
> import Codec.Pesto.Graph (test)

The testcases can be run with ``cabal test``. This runs *all* testcases from
all modules and prints a summary.

> main = runTestTT tests >>= \c -> if errors c + failures c > 0 then exitFailure else exitSuccess

> tests = TestList [
> 	  "parse" ~: Codec.Pesto.Parse.test
> 	, "graph" ~: Codec.Pesto.Graph.test
> 	, "lint" ~: Codec.Pesto.Lint.test
> 	]