Upgrade to GHC 9.8.1

src/Weeder.hs

@@ -59,9 +59,7 @@ import Data.Generics.Labels ()
 import GHC.Data.FastString ( unpackFS )
 import GHC.Types.Avail
   ( AvailInfo( Avail, AvailTC )
-  , GreName( NormalGreName, FieldGreName )
   )
-import GHC.Types.FieldLabel ( FieldLabel( FieldLabel, flSelector ) )
 import GHC.Iface.Ext.Types
   ( BindType( RegularBind )
   , ContextInfo( Decl, ValBind, PatternBind, Use, TyDecl, ClassTyDecl, EvidenceVarBind, RecField )
@@ -333,21 +331,14 @@ typeToNames (Roll t) = case t of
 
 analyseExport :: MonadState Analysis m => Module -> AvailInfo -> m ()
 analyseExport m = \case
-  Avail (NormalGreName name) ->
+  Avail name ->
     traverse_ addExport $ nameToDeclaration name
 
-  Avail (FieldGreName (FieldLabel{ flSelector })) ->
-    traverse_ addExport $ nameToDeclaration flSelector
-
   AvailTC name pieces -> do
     for_ ( nameToDeclaration name ) addExport
 
-    for_ pieces \case
-      NormalGreName name' ->
-        traverse_ addExport $ nameToDeclaration name'
-
-      FieldGreName (FieldLabel{ flSelector }) ->
-        traverse_ addExport $ nameToDeclaration flSelector
+    for_ pieces $
+      traverse_ addExport . nameToDeclaration
 
   where
 

src/Weeder/Run.hs

@@ -7,7 +7,6 @@
 module Weeder.Run ( runWeeder, Weed(..), formatWeed ) where
 
 -- base
-import Control.Applicative ( liftA2 )
 import Control.Monad ( guard )
 import Data.List ( sortOn )
 import Data.Foldable ( fold, foldl' )

weeder.cabal

@@ -23,22 +23,22 @@ extra-source-files:
 library
   build-depends:
     , algebraic-graphs     ^>= 0.7
-    , async                ^>= 2.2.0
-    , base                 ^>= 4.17.0.0 || ^>= 4.18.0.0
-    , bytestring           ^>= 0.10.9.0 || ^>= 0.11.0.0
-    , containers           ^>= 0.6.2.1
-    , directory            ^>= 1.3.3.2
-    , filepath             ^>= 1.4.2.1
-    , generic-lens         ^>= 2.2.0.0
-    , ghc                  ^>= 9.4 || ^>= 9.6
-    , lens                 ^>= 5.1 || ^>= 5.2
-    , mtl                  ^>= 2.2.2 || ^>= 2.3
-    , optparse-applicative ^>= 0.14.3.0 || ^>= 0.15.1.0 || ^>= 0.16.0.0 || ^>=  0.17
-    , parallel             ^>= 3.2.0.0
-    , regex-tdfa           ^>= 1.2.0.0 || ^>= 1.3.1.0
-    , text                 ^>= 2.0.1
-    , toml-reader          ^>= 0.2.0.0
-    , transformers         ^>= 0.5.6.2 || ^>= 0.6
+    , async                ^>= 2.2.5
+    , base                 ^>= 4.19.0.0
+    , bytestring           ^>= 0.12.0.2
+    , containers           ^>= 0.6.8
+    , directory            ^>= 1.3.8.1
+    , filepath             ^>= 1.4.100.4
+    , generic-lens         ^>= 2.2.2.0
+    , ghc                  ^>= 9.8.1
+    , lens                 ^>= 5.2.3
+    , mtl                  ^>= 2.3.1
+    , optparse-applicative ^>= 0.18.1.0
+    , parallel             ^>= 3.2.2.0
+    , regex-tdfa           ^>= 1.3.2.2
+    , text                 ^>= 2.1
+    , toml-reader          ^>= 0.2.1.0
+    , transformers         ^>= 0.6.1.0
   hs-source-dirs: src
   exposed-modules:
     Weeder