From dcadd5c7baca1e2f412b3cbd954954edbbda233c Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Tue, 12 Aug 2014 16:41:21 +0900 Subject: [PATCH] removing warnings. --- test/TestUtils.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/TestUtils.hs b/test/TestUtils.hs index 29ec8d1..02ce0e3 100644 --- a/test/TestUtils.hs +++ b/test/TestUtils.hs @@ -12,8 +12,6 @@ module TestUtils ( import Language.Haskell.GhcMod.Monad import Language.Haskell.GhcMod.Types -import Control.Applicative - isolateCradle :: IOish m => GhcModT m a -> GhcModT m a isolateCradle action = local modifyEnv $ action @@ -30,9 +28,11 @@ runIsolatedGhcMod opt action = do extract $ runGhcModT opt $ isolateCradle action -- | Run GhcMod in isolated cradle with default options +runID :: GhcModT IO a -> IO a runID = runIsolatedGhcMod defaultOptions -- | Run GhcMod in isolated cradle +runI :: Options -> GhcModT IO a -> IO a runI = runIsolatedGhcMod -- | Run GhcMod