From 2939cee44cf2ab18e2627754d19bcd8b6c9e96fb Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 29 Apr 2017 03:23:00 +0200 Subject: Compilation warnings (redundant imports) in GHC 8.0 --- src/Plugins/Monitors/CoreCommon.hs | 2 -- src/Plugins/Monitors/Net.hs | 2 +- src/Runnable.hs | 2 +- 3 files changed, 2 insertions(+), 4 deletions(-) diff --git a/src/Plugins/Monitors/CoreCommon.hs b/src/Plugins/Monitors/CoreCommon.hs index 2c10c70..4ded88a 100644 --- a/src/Plugins/Monitors/CoreCommon.hs +++ b/src/Plugins/Monitors/CoreCommon.hs @@ -16,8 +16,6 @@ module Plugins.Monitors.CoreCommon where -import Control.Applicative -import Control.Monad import Data.Char hiding (Space) import Data.Function import Data.List diff --git a/src/Plugins/Monitors/Net.hs b/src/Plugins/Monitors/Net.hs index a8c2951..e290539 100644 --- a/src/Plugins/Monitors/Net.hs +++ b/src/Plugins/Monitors/Net.hs @@ -23,7 +23,7 @@ import Plugins.Monitors.Common import Data.Word (Word64) import Data.IORef (IORef, newIORef, readIORef, writeIORef) import Data.Time.Clock (UTCTime, getCurrentTime, diffUTCTime) -import Control.Monad (forM, filterM, liftM) +import Control.Monad (forM, filterM) import System.Directory (getDirectoryContents, doesFileExist) import System.FilePath (()) import System.Console.GetOpt diff --git a/src/Runnable.hs b/src/Runnable.hs index 84d9b77..04272f5 100644 --- a/src/Runnable.hs +++ b/src/Runnable.hs @@ -46,7 +46,7 @@ class ReadAsAnyOf ts ex where instance ReadAsAnyOf () ex where readAsAnyOf ~() = mzero -instance (Show t, Read t, Exec t, ReadAsAnyOf ts Runnable) => ReadAsAnyOf (t,ts) Runnable where +instance (Read t, Exec t, ReadAsAnyOf ts Runnable) => ReadAsAnyOf (t,ts) Runnable where readAsAnyOf ~(t,ts) = r t `mplus` readAsAnyOf ts where r ty = do { m <- readPrec; return (Run (m `asTypeOf` ty)) } -- cgit v1.2.3