summaryrefslogtreecommitdiff
path: root/tests/TestSuite/Util.hs
diff options
context:
space:
mode:
Diffstat (limited to 'tests/TestSuite/Util.hs')
-rw-r--r--tests/TestSuite/Util.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/TestSuite/Util.hs b/tests/TestSuite/Util.hs
index 7a2f0a7..7000f5d 100644
--- a/tests/TestSuite/Util.hs
+++ b/tests/TestSuite/Util.hs
@@ -68,7 +68,7 @@ newTestProvider store = newProvider store (const False) "tests/data"
testCompiler :: Store -> Provider -> Identifier -> Compiler a
-> IO (CompilerResult a)
testCompiler store provider underlying compiler = do
- logger <- Logger.new Logger.Debug (\_ -> return ())
+ logger <- Logger.new Logger.Error
let read' = CompilerRead
{ compilerUnderlying = underlying
, compilerProvider = provider