Try to support ghc-8.x

IntersectMBO · Feb 3, 2025 · cac10ef · cac10ef
1 parent 5e55b46
commit cac10ef
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/Database/LSMTree/Internal/MergingRun.hs b/src/Database/LSMTree/Internal/MergingRun.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP             #-}
 {-# LANGUAGE MultiWayIf      #-}
 {-# LANGUAGE PatternSynonyms #-}
 {-# LANGUAGE TypeFamilies    #-}
@@ -367,7 +368,9 @@ pattern CreditsPair :: SpentCredits -> UnspentCredits -> Int
 pattern CreditsPair sc uc <- (unpackCreditsPair -> (sc, uc))
   where
     CreditsPair sc uc = packCreditsPair sc uc
+#if MIN_VERSION_GLASGOW_HASKELL(9,0,0,0)
 {-# INLINE CreditsPair #-}
+#endif
 {-# COMPLETE CreditsPair #-}
 
 {-# INLINE packCreditsPair #-}