git.iko.soy/typeable/ordered-containers
on master help sign in
whitespace only
commit14d0b5cf6bc09289925373f82d38b9664f6e9427 authorDaniel Wagner <me@dmwit.com> dateMon 25 Mar 2019, 17:12 (8 years ago) parent73f8217
2 files changed+4−4
Data/Map/Ordered/Strict.hs+2−2 Data/Map/Util.hs+2−2
Data/Map/Ordered/Strict.hs+2−2
@@ -37,8 +37,8 @@ module Data.Map.Ordered.Strict
3737import Data.Foldable (foldl')
3838import qualified Data.Map.Strict as M
3939import Data.Map.Ordered.Internal
40− ( OMap(..), empty, (<>|), (|<>), delete, filter, (\\), (|/\), (/\|), null, size
41− , member, notMember, lookup, findIndex, elemAt, assocs, toAscList, fromTV )
40+ ( OMap(..), empty, (<>|), (|<>), delete, filter, (\\), (|/\), (/\|), null, size
41+ , member, notMember, lookup, findIndex, elemAt, assocs, toAscList, fromTV )
4242import Data.Map.Util
4343import Prelude hiding (filter, lookup, null)
4444
Data/Map/Util.hs+2−2
@@ -49,8 +49,8 @@ readsPrecList fromList d = readParen (d > 10) $ \r -> do
4949-- tells whether 'mappend' will prefer the indices of its first or second
5050-- argument if there are shared elements in both.
5151newtype Bias (dir :: IndexPreference) a = Bias { unbiased :: a }
52− deriving (Data, Eq, Foldable, Functor, Ord, Read, Show, Traversable, Typeable)
52+ deriving (Data, Eq, Foldable, Functor, Ord, Read, Show, Traversable, Typeable)
5353data IndexPreference = L | R
54− deriving Typeable
54+ deriving Typeable
5555type L = 'L
5656type R = 'R