git.iko.soy/patch
on develop help sign in
Clean up imports
18ffd92John Ericson
src/Data/Patch.hs+16−12
compare with develop
unifiedsplit
@@ -13,27 +13,31 @@ module Data.Patch
13 , module X
13 , module X
14 ) where
14 ) where
15
15
16+import Control.Applicative
17+import Data.Functor.Const (Const (..))
18+import Data.Functor.Identity
16import Data.Map.Monoidal (MonoidalMap)
19import Data.Map.Monoidal (MonoidalMap)
20+import Data.Proxy
17#if !MIN_VERSION_base(4,9,0)
21#if !MIN_VERSION_base(4,9,0)
18import Data.Semigroup (Semigroup (..), (<>))
22import Data.Semigroup (Semigroup (..), (<>))
19#endif
23#endif
24+import GHC.Generics
20
25
21import Data.Patch.Class as X
26import Data.Patch.Class as X
22import Data.Patch.DMap as X hiding (getDeletions)
27import Data.Patch.DMap as X hiding (getDeletions)
28+import Data.Patch.DMapWithMove as X
23−import Data.Patch.DMapWithMove as X (PatchDMapWithMove, const2PatchDMapWithMoveWith, mapPatchDMapWithMove,
29+ ( PatchDMapWithMove, const2PatchDMapWithMoveWith, mapPatchDMapWithMove
24− patchDMapWithMoveToPatchMapWithMoveWith,
30+ , patchDMapWithMoveToPatchMapWithMoveWith
25− traversePatchDMapWithMoveWithKey, unPatchDMapWithMove,
31+ , traversePatchDMapWithMoveWithKey, unPatchDMapWithMove
26− unsafePatchDMapWithMove, weakenPatchDMapWithMoveWith)
32+ , unsafePatchDMapWithMove, weakenPatchDMapWithMoveWith
33+ )
27import Data.Patch.IntMap as X hiding (getDeletions)
34import Data.Patch.IntMap as X hiding (getDeletions)
28import Data.Patch.Map as X
35import Data.Patch.Map as X
36+import Data.Patch.MapWithMove as X
29−import Data.Patch.MapWithMove as X (PatchMapWithMove, patchMapWithMoveNewElements,
37+ ( PatchMapWithMove, patchMapWithMoveNewElements
30− patchMapWithMoveNewElementsMap, unPatchMapWithMove,
38+ , patchMapWithMoveNewElementsMap, unPatchMapWithMove
31− unsafePatchMapWithMove)
39+ , unsafePatchMapWithMove
32−import GHC.Generics
40+ )
33−import Data.Functor.Identity
34−import Data.Functor.Const
35−import Data.Proxy
36−import Control.Applicative
37
41
38-- | A 'Group' is a 'Monoid' where every element has an inverse.
42-- | A 'Group' is a 'Monoid' where every element has an inverse.
39class (Semigroup q, Monoid q) => Group q where
43class (Semigroup q, Monoid q) => Group q where