module Codec.Compression.Snappy.Iteratee.Lazy where import Data.Iteratee.Iteratee import Data.ByteString.Lazy import qualified Codec.Compression.Snappy.Lazy as S compress, decompress :: Monad m => Enumeratee ByteString ByteString m a compress = mapChunks S.compress decompress = mapChunks S.decompress