zlib-0.6.2.1/examples/gzip.hs

module Main where

import qualified Data.ByteString.Lazy as B
import qualified Codec.Compression.GZip as GZip

main = B.interact $ GZip.compressWith GZip.defaultCompressParams {
                      GZip.compressLevel = GZip.BestCompression
                    }