Try to fix for old GHC

Author: treeowl

containers/src/Data/Sequence/Internal/Depth.hs

@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 {-# LANGUAGE GADTs #-}
 {-# LANGUAGE KindSignatures #-}
 {-# LANGUAGE PatternSynonyms #-}
@@ -83,7 +84,11 @@ data CheckedBottom node a t where
 checkBottom :: Depth_ node a t -> CheckedBottom node a t
 checkBottom (Depth_ 0) = unsafeCoerce AtBottom
 checkBottom (Depth_ d) = unsafeCoerce (NotBottom (Depth_ (d - 1)))
+#if MIN_VERSION_GLASGOW_HASKELL(9,2,0,0)
 {-# INLINE checkBottom #-}
+#else
+{-# NOINLINE checkBottom #-}
+#endif
 
 
 -- | A version of 'Depth_' for implementing traversals. Conceptually,
@@ -122,4 +127,8 @@ data CheckedBottom2 node a t b u where
 checkBottom2 :: Depth2_ node a t b u -> CheckedBottom2 node a t b u
 checkBottom2 (Depth2_ 0) = unsafeCoerce AtBottom2
 checkBottom2 (Depth2_ d) = unsafeCoerce (NotBottom2 (Depth2_ (d - 1)))
+#if MIN_VERSION_GLASGOW_HASKELL(9,2,0,0)
 {-# INLINE checkBottom2 #-}
+#else
+{-# NOINLINE checkBottom2 #-}
+#endif