From 204d449aefd5beb017109974c83bb009f6e62b6b Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Tue, 15 Jul 2014 21:34:05 +0900
Subject: [PATCH] set optimization level to 0 just in case.

---
 Language/Haskell/GhcMod/DynFlags.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Language/Haskell/GhcMod/DynFlags.hs b/Language/Haskell/GhcMod/DynFlags.hs
index 7cbbd4d..76b6da1 100644
--- a/Language/Haskell/GhcMod/DynFlags.hs
+++ b/Language/Haskell/GhcMod/DynFlags.hs
@@ -27,6 +27,7 @@ setModeSimple df = df {
     ghcMode   = CompManager
   , ghcLink   = NoLink
   , hscTarget = HscNothing
+  , optLevel  = 0
   }
 
 -- Slow
@@ -38,6 +39,7 @@ setModeIntelligent df = df {
     ghcMode   = CompManager
   , ghcLink   = LinkInMemory
   , hscTarget = HscInterpreted
+  , optLevel  = 0
   }
 
 setIncludeDirs :: [IncludeDir] -> DynFlags -> DynFlags