diff options
Diffstat (limited to 'configure.hs')
-rw-r--r-- | configure.hs | 21 |
1 files changed, 2 insertions, 19 deletions
diff --git a/configure.hs b/configure.hs index 6fdc5fcb0..15833e62a 100644 --- a/configure.hs +++ b/configure.hs @@ -1,23 +1,6 @@ {- configure program -} -import Data.Maybe - -import qualified Build.Configure as Configure -import Build.TestConfig -import Utility.StatFS - -tests :: [TestCase] -tests = [ TestCase "StatFS" testStatFS - ] ++ Configure.tests False - -{- This test cannot be included in Build.Configure due to needing - - Utility/StatFS.hs to be built, which it is not when "cabal configure" - - is run. -} -testStatFS :: Test -testStatFS = do - s <- getFileSystemStats "." - return $ Config "statfs_sanity_checked" $ - MaybeBoolConfig $ Just $ isJust s +import Build.Configure main :: IO () -main = Configure.run tests +main = run tests |