From e6fc3dd8d2346a553026f4913678b4f9831080c8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= Date: Fri, 8 May 2015 00:06:08 +0200 Subject: [PATCH] Fix tests --- Language/Haskell/GhcMod/Target.hs | 3 ++- test/TestUtils.hs | 1 - 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Language/Haskell/GhcMod/Target.hs b/Language/Haskell/GhcMod/Target.hs index d6b830a..76fbc76 100644 --- a/Language/Haskell/GhcMod/Target.hs +++ b/Language/Haskell/GhcMod/Target.hs @@ -114,7 +114,8 @@ dropSession = do -- TODO: This is still not enough, there seem to still be references to -- GHC's state around afterwards. liftIO $ writeIORef ref (error "HscEnv: session was dropped") - liftIO $ setUnsafeGlobalDynFlags (error "DynFlags: session was dropped") + -- Not available on ghc<7.8; didn't really help anyways + -- liftIO $ setUnsafeGlobalDynFlags (error "DynFlags: session was dropped") Nothing -> return () diff --git a/test/TestUtils.hs b/test/TestUtils.hs index 877e229..dfe0644 100644 --- a/test/TestUtils.hs +++ b/test/TestUtils.hs @@ -19,7 +19,6 @@ import Language.Haskell.GhcMod.Types import Control.Arrow import Control.Applicative -import Control.Monad (when) import Control.Monad.Error (ErrorT, runErrorT) import Control.Monad.Trans.Journal import Data.List.Split