wrote more...

[Rakka.git] / Setup.hs

diff --git a/Setup.hs b/Setup.hs
index 39a754708bd585009364b5cd135a4fff647bc5ab..857ea9c577e7570ced3032799252fcf2e3d13ebd 100755 (executable)
--- a/Setup.hs
+++ b/Setup.hs
@@ -1,4 +1,10 @@
 #!/usr/bin/env runghc
 
 import Distribution.Simple
-main = defaultMainWithHooks defaultUserHooks
+import System.Cmd
+import System.Exit
+
+main = defaultMainWithHooks (defaultUserHooks { runTests = runTestUnit })
+    where
+      runTestUnit _ _ _ _
+          = system "./dist/build/RakkaUnitTest/RakkaUnitTest"