Bumps

.github/workflows/haskell.yml

@@ -1,12 +1,12 @@
 name: github-action
 
-on: [push, pull_request] 
+on: [push, pull_request]
 
 jobs:
   build:
     strategy:
       matrix:
-        ghc: ['8.6.5', '8.8.4', '8.10.7']
+        ghc: ['8.6', '8.8', '8.10', '9.0', '9.2', '9.4', '9.6', '9.8', '9.10']
         os: ['ubuntu-latest', 'macos-latest']
     runs-on: ${{ matrix.os }}
 

monoid-map.cabal

@@ -30,10 +30,10 @@ library
 
   build-depends:
     , base                 >=4   && <5
-    , commutative-semigroups >= 0.1 && < 0.2
+    , commutative-semigroups >= 0.1 && < 0.3
     , monoidal-containers  ^>=0.6
     , reflex               >=0.8 && < 1
-    , witherable           >=0.3 && <0.5
+    , witherable           >=0.4 && <0.6
     , patch                >=0.0.8.0 && < 0.1
 
   hs-source-dirs:   src

src/Data/MonoidMap.hs

@@ -14,20 +14,19 @@
 {-# LANGUAGE DataKinds #-}
 module Data.MonoidMap where
 
-import Data.Witherable
 import Data.Semigroup.Commutative
 import Data.Map.Monoidal (MonoidalMap)
 import qualified Data.Map.Monoidal as Map
-import Data.Semigroup (Semigroup, (<>))
 import Reflex (Query, QueryResult, crop, Group(..))
 import Data.Monoid.DecidablyEmpty
 import GHC.TypeLits
+import Witherable
 
 -- | Newtype wrapper around Data.Map.Monoidal.MonoidalMap
 newtype MonoidMap k v = MonoidMap { unMonoidMap :: MonoidalMap k v }
   deriving (Show, Eq, Ord, Foldable)
 
 instance TypeError (Text "Use mapMonoidMap instead of fmap; MonoidMap is not a Functor because mempty values would need to be deleted, and Functors cannot change the shape of a datastructure") => Functor (MonoidMap k) where
   fmap = error "Impossible"
 
 emptyToNothing :: DecidablyEmpty a => a -> Maybe a