@@ -1,4 +1,4 @@
1−{-# LANGUAGE BangPatterns #-}
1+{-# LANGUAGE BangPatterns, CPP #-}
22
33import Control.Applicative
44import Control.DeepSeq (NFData(rnf))
@@ -22,8 +22,10 @@ import qualified Data.Text.Lazy as TL
2222import Data.Word (Word8)
2323import qualified Text.Parsec as P
2424
25+#if !MIN_VERSION_bytestring(0,10,0)
2526instance NFData ByteString where
2627 rnf (PS _ _ _) = ()
28+#endif
2729
2830instance NFData P.ParseError where
2931 rnf = rnf . show