diff options
author | Jasper Van der Jeugt <m@jaspervdj.be> | 2017-12-18 20:05:28 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2017-12-18 20:05:28 +0100 |
commit | 030864a921d38405778ddeb1286e8922955c8ab4 (patch) | |
tree | 81b65317f3b48dd39f192739dcc39b5adac35c5f /tests | |
parent | 7634b44e4ad9f6a0ba77c377eb1ee43085687789 (diff) | |
download | hakyll-030864a921d38405778ddeb1286e8922955c8ab4.tar.gz |
Fix warnings and errors
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Hakyll/Web/CompressCss/Tests.hs | 3 | ||||
-rw-r--r-- | tests/TestSuite/Util.hs | 7 |
2 files changed, 5 insertions, 5 deletions
diff --git a/tests/Hakyll/Web/CompressCss/Tests.hs b/tests/Hakyll/Web/CompressCss/Tests.hs index bf51ee2..66922cd 100644 --- a/tests/Hakyll/Web/CompressCss/Tests.hs +++ b/tests/Hakyll/Web/CompressCss/Tests.hs @@ -5,9 +5,8 @@ module Hakyll.Web.CompressCss.Tests -------------------------------------------------------------------------------- -import Data.Char (toUpper) import Test.Tasty (TestTree, testGroup) -import Test.Tasty.HUnit (assert, (@=?)) +import Test.Tasty.HUnit ((@=?)) -------------------------------------------------------------------------------- diff --git a/tests/TestSuite/Util.hs b/tests/TestSuite/Util.hs index 35ee112..33b26ef 100644 --- a/tests/TestSuite/Util.hs +++ b/tests/TestSuite/Util.hs @@ -76,13 +76,14 @@ testCompilerDone store provider underlying compiler = do result <- testCompiler store provider underlying compiler case result of CompilerDone x _ -> return x - CompilerError e -> error $ + CompilerError e -> fail $ "TestSuite.Util.testCompilerDone: compiler " ++ show underlying ++ " threw: " ++ intercalate "; " e - CompilerRequire i _ -> error $ + CompilerRequire i _ -> fail $ "TestSuite.Util.testCompilerDone: compiler " ++ show underlying ++ " requires: " ++ show i - + CompilerSnapshot _ _ -> fail + "TestSuite.Util.testCompilerDone: unexpected CompilerSnapshot" -------------------------------------------------------------------------------- |