@@ -1,4 +1,4 @@
1−{-# LANGUAGE ViewPatterns, DeriveDataTypeable, GeneralizedNewtypeDeriving #-}
1+{-# LANGUAGE CPP, ViewPatterns, DeriveDataTypeable, GeneralizedNewtypeDeriving #-}
22
33------------------------------------------------------------------------------
44-- |
@@ -23,7 +23,9 @@ import qualified Data.Attoparsec.ByteString.Char8 as P (isSpace_w8)
2323import qualified Data.ByteString as BS
2424import Data.ByteString.Internal (c2w, w2c)
2525import qualified Data.ByteString.Lazy as BL
26−import qualified Data.ByteString.Lazy.Internal as BL
26+#if !MIN_VERSION_bytestring(0,10,0)
27+import qualified Data.ByteString.Lazy.Internal as BL (foldrChunks)
28+#endif
2729import Data.Map(Map)
2830import qualified Data.Map as Map
2931import Data.Text(Text)