diff --git a/servant-serf.cabal b/servant-serf.cabal
--- a/servant-serf.cabal
+++ b/servant-serf.cabal
@@ -1,7 +1,7 @@
 cabal-version: 2.0
 
 name: servant-serf
-version: 0.3.1.3
+version: 0.3.1.4
 synopsis: Automatically generate Servant API modules.
 description:
   = servant-serf
@@ -87,8 +87,8 @@
 library
   autogen-modules: Paths_servant_serf
   build-depends:
-    base >= 4.15.0 && < 4.18
-    , Cabal-syntax >= 3.6.0 && < 3.9
+    base >= 4.15.0 && < 4.19
+    , Cabal-syntax >= 3.6.0 && < 3.11
     , directory >= 1.3.6 && < 1.4
     , exceptions >= 0.10.4 && < 0.11
     , filepath >= 1.4.2 && < 1.5
diff --git a/source/library/ServantSerf/Type/Config.hs b/source/library/ServantSerf/Type/Config.hs
--- a/source/library/ServantSerf/Type/Config.hs
+++ b/source/library/ServantSerf/Type/Config.hs
@@ -22,7 +22,7 @@
 fromFlags :: (Foldable t, Exception.MonadThrow m) => t Flag.Flag -> m Config
 fromFlags = Monad.foldM applyFlag initial
 
-applyFlag :: Exception.MonadThrow m => Config -> Flag.Flag -> m Config
+applyFlag :: (Exception.MonadThrow m) => Config -> Flag.Flag -> m Config
 applyFlag config flag = case flag of
   Flag.ApiName x -> pure config {apiName = x}
   Flag.Depth x -> case Depth.fromString x of
diff --git a/source/library/ServantSerf/Type/Context.hs b/source/library/ServantSerf/Type/Context.hs
--- a/source/library/ServantSerf/Type/Context.hs
+++ b/source/library/ServantSerf/Type/Context.hs
@@ -17,7 +17,7 @@
   }
   deriving (Eq, Show)
 
-fromArguments :: Exception.MonadThrow m => [String] -> m Context
+fromArguments :: (Exception.MonadThrow m) => [String] -> m Context
 fromArguments arguments = do
   let (fs, as, us, is) = Console.getOpt' Console.Permute Flag.options arguments
   mapM_ (Exception.throwM . UnknownOption.UnknownOption) us