on develop help sign in
MapWithPatchingMove Patch instance won't get semigroup from older base
commit3e78a7230f8473524ed53578c666ff594dd76658 authorJohn Ericson <John.Ericson@Obsidian.Systems> dateThu 23 Jan 2020, 10:48 (7 years ago) parent1bfa6d6
1 file changed+6−2
src/Data/Patch/MapWithPatchingMove.hs+6−2
src/Data/Patch/MapWithPatchingMove.hs+6−2
@@ -279,13 +279,17 @@ nodeInfoSetTo
279279 :: To k -> NodeInfo k v -> NodeInfo k v
280280nodeInfoSetTo to ni = ni { _nodeInfo_to = to }
281281
282−-- |Helper data structure used for composing patches using the monoid instance.
282+-- | Helper data structure used for composing patches using the monoid instance.
283283data Fixup k v
284284 = Fixup_Delete
285285 | Fixup_Update (These (From k v) (To k))
286286
287−-- |Compose patches having the same effect as applying the patches in turn: @'applyAlways' (p <> q) == 'applyAlways' p . 'applyAlways' q@
287+-- | Compose patches having the same effect as applying the patches in turn:
288+-- @'applyAlways' (p <> q) == 'applyAlways' p . 'applyAlways' q@
288289instance ( Ord k
290+#if !MIN_VERSION_base(4,10,0)
291+ , Semigroup p
292+#endif
289293 , Monoid p
290294 , DecidablyEmpty p
291295 , Patch p