@@ -1,4 +1,4 @@
1−{-# LANGUAGE BangPatterns, MagicHash, RankNTypes, RecordWildCards,
1+{-# LANGUAGE BangPatterns, CPP, MagicHash, RankNTypes, RecordWildCards,
22 UnboxedTuples #-}
33
44-- |
@@ -39,7 +39,9 @@ module Data.Attoparsec.Text.Buffer
3939import Control.Exception (assert)
4040import Data.Bits (shiftR)
4141import Data.List (foldl1')
42+#if !MIN_VERSION_base(4,8,0)
4243import Data.Monoid (Monoid(..))
44+#endif
4345import Data.Text ()
4446import Data.Text.Internal (Text(..))
4547import Data.Text.Internal.Encoding.Utf16 (chr2)