on warp/1.3.8.2 help sign in
11 lines 311 B history raw
1#!/usr/bin/env runhaskell
3> module Main where
4> import Distribution.Simple
5> import System.Cmd (system)
7> main :: IO ()
8> main = defaultMainWithHooks (simpleUserHooks { runTests = runTests' })
10> runTests' :: a -> b -> c -> d -> IO ()
11> runTests' _ _ _ _ = system "runhaskell -DTEST runtests.hs" >> return ()