GHC < 7.10 compat (again...)

Twinside · May 6, 2015 · 1683001 · 1683001
1 parent 13c6554
commit 1683001
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/Codec/Picture/Bitmap.hs b/src/Codec/Picture/Bitmap.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE FlexibleContexts #-}
 {-# LANGUAGE ScopedTypeVariables #-}
@@ -16,6 +17,10 @@ module Codec.Picture.Bitmap( -- * Functions
                              -- * Accepted format in output
                            , BmpEncodable( )
                            ) where
+#if !MIN_VERSION_base(4,8,0)
+import Data.Monoid( mempty )
+#endif
+
 import Control.Monad( when, forM_ )
 import Control.Monad.ST ( ST, runST )
 import Data.Maybe( fromMaybe )