diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,5 +1,9 @@
 # Changelog for the `parameterized-utils` package
 
+## 2.1.9.0 -- *2024 Sep 19*
+
+  * Add support for GHC 9.10.
+
 ## 2.1.8.0 -- *2023 Jan 15*
 
   * Add support for GHC 9.8.
diff --git a/parameterized-utils.cabal b/parameterized-utils.cabal
--- a/parameterized-utils.cabal
+++ b/parameterized-utils.cabal
@@ -1,6 +1,6 @@
 Cabal-version: 2.2
 Name:          parameterized-utils
-Version:       2.1.8.0
+Version:       2.1.9.0
 Author:        Galois Inc.
 Maintainer:    kquick@galois.com, rscott@galois.com
 stability:     stable
@@ -19,7 +19,7 @@
 extra-source-files: Changelog.md
 homepage:      https://github.com/GaloisInc/parameterized-utils
 bug-reports:   https://github.com/GaloisInc/parameterized-utils/issues
-tested-with:   GHC==8.6.5, GHC==8.8.4, GHC==8.10.7, GHC==9.0.2, GHC==9.2.1, GHC==9.4.3
+tested-with:   GHC==8.6.5, GHC==8.8.4, GHC==8.10.7, GHC==9.0.2, GHC==9.2.2, GHC==9.4.5, GHC==9.6.1, GHC==9.8.1, GHC==9.10.1
 
 -- Many (but not all, sadly) uses of unsafe operations are
 -- controlled by this compile flag.  When this flag is set
@@ -52,15 +52,15 @@
   import: bldflags
   build-depends: base >= 4.10 && < 5
                , base-orphans   >=0.8.2 && <0.10
-               , th-abstraction >=0.4.2 && <0.7
+               , th-abstraction >=0.4.2 && <0.8
                , constraints    >=0.10 && <0.15
                , containers
                , deepseq
                , ghc-prim
-               , hashable       >=1.2  && <1.5
+               , hashable       >=1.2  && <1.6
                , hashtables     >=1.2  && <1.4
                , indexed-traversable
-               , lens           >=4.16 && <5.3
+               , lens           >=4.16 && <5.4
                , mtl
                , profunctors    >=5.6 && < 5.7
                , template-haskell
diff --git a/src/Data/Parameterized/Map.hs b/src/Data/Parameterized/Map.hs
--- a/src/Data/Parameterized/Map.hs
+++ b/src/Data/Parameterized/Map.hs
@@ -86,7 +86,7 @@
 import           Control.Monad.Identity (Identity(..))
 import           Control.Monad (foldM)
 import           Data.Kind (Type)
-import           Data.List (intercalate, foldl')
+import qualified Data.List as List
 import           Data.Monoid
 import           Prelude hiding (filter, lookup, map, traverse, null)
 
@@ -370,7 +370,7 @@
         -> (forall tp . rtp tp -> String)
         -> MapF ktp rtp
         -> String
-showMap ppk ppv m = "{ " ++ intercalate ", " l ++ " }"
+showMap ppk ppv m = "{ " ++ List.intercalate ", " l ++ " }"
   where l = foldrWithKey (\k a l0 -> (ppk k ++ " -> " ++ ppv a) : l0) [] m
 
 ------------------------------------------------------------------------
@@ -522,7 +522,7 @@
 
 -- | Create a Map from a list of pairs.
 fromList :: OrdF k => [Pair k a] -> MapF k a
-fromList = foldl' (\m (Pair k a) -> insert k a m) Data.Parameterized.Map.empty
+fromList = List.foldl' (\m (Pair k a) -> insert k a m) Data.Parameterized.Map.empty
 
 -- | Return list of key-values pairs in map in ascending order.
 toAscList :: MapF k a -> [Pair k a]
