[commit: packages/hoopl] master: avoid redundant import warnings (d39ddd9)

git at git.haskell.org git at git.haskell.org
Sat Dec 27 22:47:56 UTC 2014


Repository : ssh://git@git.haskell.org/hoopl

On branch  : master
Link       : http://git.haskell.org/packages/hoopl.git/commitdiff/d39ddd928e0d691ee571768a613fd10f6f951a40

>---------------------------------------------------------------

commit d39ddd928e0d691ee571768a613fd10f6f951a40
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date:   Sat Dec 27 23:48:29 2014 +0100

    avoid redundant import warnings


>---------------------------------------------------------------

d39ddd928e0d691ee571768a613fd10f6f951a40
 src/Compiler/Hoopl/Fuel.hs   | 2 ++
 src/Compiler/Hoopl/Graph.hs  | 2 ++
 src/Compiler/Hoopl/Unique.hs | 2 ++
 3 files changed, 6 insertions(+)

diff --git a/src/Compiler/Hoopl/Fuel.hs b/src/Compiler/Hoopl/Fuel.hs
index 3811f32..d6b042e 100644
--- a/src/Compiler/Hoopl/Fuel.hs
+++ b/src/Compiler/Hoopl/Fuel.hs
@@ -21,7 +21,9 @@ where
 import Compiler.Hoopl.Checkpoint
 import Compiler.Hoopl.Unique
 
+#if !MIN_VERSION_base(4,8,0)
 import Control.Applicative (Applicative(..))
+#endif
 import Control.Monad (ap,liftM)
 
 class Monad m => FuelMonad m where
diff --git a/src/Compiler/Hoopl/Graph.hs b/src/Compiler/Hoopl/Graph.hs
index b553648..79fbfbb 100644
--- a/src/Compiler/Hoopl/Graph.hs
+++ b/src/Compiler/Hoopl/Graph.hs
@@ -46,7 +46,9 @@ import Compiler.Hoopl.Collections
 import Compiler.Hoopl.Block
 import Compiler.Hoopl.Label
 
+#if !MIN_VERSION_base(4,8,0)
 import Control.Applicative (Applicative(..))
+#endif
 import Control.Monad (ap,liftM,liftM2)
 
 -- -----------------------------------------------------------------------------
diff --git a/src/Compiler/Hoopl/Unique.hs b/src/Compiler/Hoopl/Unique.hs
index 0e88fb4..42e2b23 100644
--- a/src/Compiler/Hoopl/Unique.hs
+++ b/src/Compiler/Hoopl/Unique.hs
@@ -24,7 +24,9 @@ import Compiler.Hoopl.Collections
 import qualified Data.IntMap as M
 import qualified Data.IntSet as S
 
+#if !MIN_VERSION_base(4,8,0)
 import Control.Applicative
+#endif
 import Control.Monad (ap,liftM)
 
 -----------------------------------------------------------------------------



More information about the ghc-commits mailing list