enummapset-th 0.6.0.0 → 0.6.0.1

raw patch · 3 files changed

+7/−7 lines, 3 filesdep ~base

Dependency ranges changed: base

Files

• Data/EnumSet.hs +2/−2
• enummapset-th.cabal +1/−1
• include/map.inc +4/−4

@@ -94,10 +94,10 @@  instance (Enum k, Show k) => Show (EnumSet k) where     showsPrec p s = showParen (p > 10) $-        showString "fromList " . shows (toList s)+        showString "fromList " . shows (Data.EnumSet.toList s)  instance (Enum k, Read k) => Read (EnumSet k) where     readPrec = parens . prec 10 $ do         Ident "fromList" <- lexP-        fmap fromList readPrec+        fmap Data.EnumSet.fromList readPrec 

@@ -1,5 +1,5 @@ name:           enummapset-th-version:        0.6.0.0+version:        0.6.0.1 synopsis:       TH-generated EnumSet/EnumMap wrappers around IntSet/IntMap. description:   This package wraps @IntSet@ and @IntMap@ from @containers@, and provides

@@ -10,7 +10,7 @@ -- | Documentation: <http://hackage.haskell.org/packages/archive/containers/latest/doc/html/Data-IntMap-STRICT.html> module Data.EnumMap.STRICT where -import Prelude (Eq, Ord, Enum, Functor (..), (.), ($), (>), const)+import Prelude (Eq, Ord, Enum, Functor (..), (.), ($), (>)) import Control.DeepSeq import Data.Data import Data.Foldable (Foldable)@@ -171,19 +171,19 @@  instance Functor (EnumMap k) where     {-# INLINE fmap #-}-    fmap = map+    fmap = Data.EnumMap.STRICT.map  deriving instance Foldable (EnumMap k) deriving instance Traversable (EnumMap k)  instance (Enum k, Show k, Show a) => Show (EnumMap k a) where     showsPrec p m = showParen (p > 10) $-        showString "fromList " . shows (toList m)+        showString "fromList " . shows (Data.EnumMap.STRICT.toList m)  instance (Enum k, Read k, Read a) => Read (EnumMap k a) where     readPrec = parens . prec 10 $ do         Ident "fromList" <- lexP-        fromList `fmap` readPrec+        Data.EnumMap.STRICT.fromList `fmap` readPrec  -- vim: ft=haskell: