From 95e1fcf0a2a5a51e486311079d7aa2bb2035c8e6 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Wed, 5 Dec 2012 16:49:28 +0100 Subject: Better error message for require/notFound --- tests/TestSuite/Util.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'tests/TestSuite') diff --git a/tests/TestSuite/Util.hs b/tests/TestSuite/Util.hs index 8e6249e..7a2f0a7 100644 --- a/tests/TestSuite/Util.hs +++ b/tests/TestSuite/Util.hs @@ -14,6 +14,7 @@ module TestSuite.Util -------------------------------------------------------------------------------- import Data.Monoid (mempty) +import qualified Data.Set as S import System.Directory (removeDirectoryRecursive) import Test.Framework import Test.Framework.Providers.HUnit @@ -71,7 +72,7 @@ testCompiler store provider underlying compiler = do let read' = CompilerRead { compilerUnderlying = underlying , compilerProvider = provider - , compilerUniverse = [] + , compilerUniverse = S.empty , compilerRoutes = mempty , compilerStore = store , compilerLogger = logger -- cgit v1.2.3