import Distribution.Simple(defaultMainWithHooks, defaultUserHooks,
                                                            UserHooks(runTests))
import System.Exit(ExitCode(ExitSuccess))
import qualified Hidden.TestMain(main)

main = defaultMainWithHooks
         defaultUserHooks { runTests = \_ _ _ _ -> Hidden.TestMain.main >>
	                    return ExitSuccess }