summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Test.lhs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Test.lhs b/src/Test.lhs
index 852c700..68f1831 100644
--- a/src/Test.lhs
+++ b/src/Test.lhs
@@ -4,6 +4,7 @@ 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)
@@ -11,7 +12,7 @@ Running tests
The testcases can be run with ``cabal run pesto-test``. This runs *all*
testcases from all modules and prints a summary.
-> main = runTestTT tests
+> main = runTestTT tests >>= \c -> if errors c + failures c > 0 then exitFailure else exitSuccess
> tests = TestList [
> "parse" ~: Codec.Pesto.Parse.test