ghcup-hs/3rdparty/zlib/examples/gzip.hs

9 lines
264 B
Haskell
Raw Permalink Normal View History

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
}