Fix tests
This commit is contained in:
parent
e202fabc39
commit
e6fc3dd8d2
@ -114,7 +114,8 @@ dropSession = do
|
|||||||
-- TODO: This is still not enough, there seem to still be references to
|
-- TODO: This is still not enough, there seem to still be references to
|
||||||
-- GHC's state around afterwards.
|
-- GHC's state around afterwards.
|
||||||
liftIO $ writeIORef ref (error "HscEnv: session was dropped")
|
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 ()
|
Nothing -> return ()
|
||||||
|
@ -19,7 +19,6 @@ import Language.Haskell.GhcMod.Types
|
|||||||
|
|
||||||
import Control.Arrow
|
import Control.Arrow
|
||||||
import Control.Applicative
|
import Control.Applicative
|
||||||
import Control.Monad (when)
|
|
||||||
import Control.Monad.Error (ErrorT, runErrorT)
|
import Control.Monad.Error (ErrorT, runErrorT)
|
||||||
import Control.Monad.Trans.Journal
|
import Control.Monad.Trans.Journal
|
||||||
import Data.List.Split
|
import Data.List.Split
|
||||||
|
Loading…
Reference in New Issue
Block a user