summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorConalElliott <>2014-04-06 01:34:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2014-04-06 01:34:00 (GMT)
commitb82ff7a2edefc1bd0a9b99f0db2373aba148aa56 (patch)
tree386376592a3ce20ff9153f0f071a95a963e129b7
parent689418bb16570ae7d769a131a4a734af044ace9e (diff)
version 0.9.100.9.10
-rw-r--r--TypeCompose.cabal4
-rw-r--r--src/Control/Compose.hs2
2 files changed, 5 insertions, 1 deletions
diff --git a/TypeCompose.cabal b/TypeCompose.cabal
index 1e5d02c..6cc93c5 100644
--- a/TypeCompose.cabal
+++ b/TypeCompose.cabal
@@ -1,5 +1,5 @@
Name: TypeCompose
-Version: 0.9.9
+Version: 0.9.10
Synopsis: Type composition classes & instances
Category: Composition, Control
Cabal-Version: >= 1.6
@@ -40,3 +40,5 @@ Library
ghc-options: -Wall
-- TODO: eliminate Pair or Zip
+
+-- ghc-prof-options: -prof -auto-all
diff --git a/src/Control/Compose.hs b/src/Control/Compose.hs
index bf60db1..5484f16 100644
--- a/src/Control/Compose.hs
+++ b/src/Control/Compose.hs
@@ -904,10 +904,12 @@ inConst3 f (Const a) = inConst2 (f a)
---- For Control.Applicative.Endo
+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ < 707
-- deriving instance Monoid o => Monoid (Const o a)
instance Monoid o => Monoid (Const o a) where
mempty = Const mempty
mappend = inConst2 mappend
+#endif
-- newtype Endo a = Endo { appEndo :: a -> a }