File tree Expand file tree Collapse file tree 1 file changed +5
-0
lines changed Expand file tree Collapse file tree 1 file changed +5
-0
lines changed Original file line number Diff line number Diff line change 1
1
{-# LANGUAGE DeriveFoldable #-}
2
2
{-# LANGUAGE DeriveFunctor #-}
3
3
{-# LANGUAGE DeriveTraversable #-}
4
+ {-# LANGUAGE FlexibleInstances #-}
4
5
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
6
+ {-# LANGUAGE MultiParamTypeClasses #-}
7
+ {-# LANGUAGE TemplateHaskell #-}
5
8
{-# LANGUAGE TypeFamilies #-}
6
9
-- | Module containing 'PatchIntMap', a 'Patch' for 'IntMap' which allows for
7
10
-- insert/update or delete of associations.
@@ -27,6 +30,8 @@ instance Patch (PatchIntMap a) where
27
30
adds = IntMap. mapMaybe id p
28
31
in IntMap. union adds $ v `IntMap.difference` removes
29
32
33
+ makeWrapped ''PatchIntMap
34
+
30
35
-- | @a <> b@ will apply the changes of @b@ and then apply the changes of @a@.
31
36
-- If the same key is modified by both patches, the one on the left will take
32
37
-- precedence.
You can’t perform that action at this time.
0 commit comments