Skip to content

Commit fbc33b5

Browse files
authored
Merge pull request #41 from maralorn/lens-five
Reorder TH statements for ghc 9.0 compatibility
2 parents 16e6af2 + d1353b1 commit fbc33b5

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

.github/workflows/haskell.yml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@ jobs:
66
build:
77
strategy:
88
matrix:
9-
ghc: ['8.0.2', '8.2.2', '8.4.4', '8.6.5', '8.8.4', '8.10.2']
9+
ghc: ['8.0.2', '8.2.2', '8.4.4', '8.6.5', '8.8.4', '8.10.2', '9.0.1']
1010
os: ['ubuntu-latest', 'macos-latest']
1111
exclude:
1212
# There are some linker warnings in 802 on darwin that

src/Data/Patch/Map.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -63,6 +63,8 @@ instance Ord k => Patch (PatchMap k v) where
6363
Nothing -> Just ()
6464
Just _ -> Nothing
6565

66+
makeWrapped ''PatchMap
67+
6668
instance FunctorWithIndex k (PatchMap k)
6769
instance FoldableWithIndex k (PatchMap k)
6870
instance TraversableWithIndex k (PatchMap k) where
@@ -81,5 +83,3 @@ patchMapNewElements (PatchMap p) = catMaybes $ Map.elems p
8183
-- | Returns all the new elements that will be added to the 'Map'
8284
patchMapNewElementsMap :: PatchMap k v -> Map k v
8385
patchMapNewElementsMap (PatchMap p) = Map.mapMaybe id p
84-
85-
makeWrapped ''PatchMap

0 commit comments

Comments
 (0)