Add Eq constraint for ghc-8.10 on toHashMapIO

composewell · Aug 3, 2024 · 294373e · 294373e
1 parent 4b9b55c
commit 294373e
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/Streamly/Data/Fold/Prelude.hs b/src/Streamly/Data/Fold/Prelude.hs
@@ -62,6 +62,10 @@ import Streamly.Internal.Data.IsMap.HashMap ()
 -- /Pre-release/
 --
 {-# INLINE toHashMapIO #-}
-toHashMapIO :: (MonadIO m, Hashable k) =>
+toHashMapIO :: (MonadIO m, Hashable k
+#if __GLASGOW_HASKELL__ == 810
+    , Eq k
+#endif
+    ) =>
     (a -> k) -> Fold m a b -> Fold m a (HashMap k b)
 toHashMapIO = toContainerIO