#!/usr/bin/env runhaskell

import Distribution.PackageDescription
import System.FilePath
import System
import Distribution.Simple
import Distribution.Simple.LocalBuildInfo

main = defaultMainWithHooks hooks
  where hooks = simpleUserHooks { runTests = runTests' }


runTests' :: Args -> Bool -> PackageDescription -> LocalBuildInfo -> IO ()
runTests' _ _ _ lbi = system testprog >> return ()
  where testprog = (buildDir lbi) </> "test" </> "test"