PageIO-0.0.3: Setup.lhs

#!/usr/bin/env runhaskell
> import Distribution.Simple
> import System.Cmd
> import System.Exit
> import System.Directory
> main = defaultMainWithHooks (simpleUserHooks { runTests = quickCheck } )
>     where
>     quickCheck _ _ _ _ = do
>         ec <- system $ "ghc --make -odir dist/build -hidir dist/build -idist/build:src t/runTests.hs -L/usr/lib -liconv -luuid -o t/runTests"
>         case ec of
>             ExitSuccess -> do
>                 system "t/runTests"
>             _           -> return ec
>         return ()