From aa6ecd09d2c8ffd969630d8f5589f31ead839791 Mon Sep 17 00:00:00 2001
From: meooow25 <soumiksarkar.3120@gmail.com>
Date: Wed, 7 Aug 2024 01:20:23 +0530
Subject: [PATCH] Fix Semigroup not in Prelude

---
 containers/src/Utils/Containers/Internal/EqOrdUtil.hs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/containers/src/Utils/Containers/Internal/EqOrdUtil.hs b/containers/src/Utils/Containers/Internal/EqOrdUtil.hs
index eae396581..60070b79e 100644
--- a/containers/src/Utils/Containers/Internal/EqOrdUtil.hs
+++ b/containers/src/Utils/Containers/Internal/EqOrdUtil.hs
@@ -1,8 +1,12 @@
+{-# LANGUAGE CPP #-}
 module Utils.Containers.Internal.EqOrdUtil
   ( EqM(..)
   , OrdM(..)
   ) where
 
+#if !MIN_VERSION_base(4,11,0)
+import Data.Semigroup (Semigroup(..))
+#endif
 import Utils.Containers.Internal.StrictPair
 
 newtype EqM a = EqM { runEqM :: a -> StrictPair Bool a }