module Zlib ( decompress , ZlibError(..) ) where import Data.Bytes (Bytes) import Data.Bytes.Chunks (Chunks) import Zlib.Raw (runZlib, ZlibError(..)) import qualified Zlib.Raw as Raw decompress :: Bytes -> Either ZlibError Chunks decompress :: Bytes -> Either ZlibError Chunks decompress Bytes inp = (forall s. Zlib s Chunks) -> Bytes -> Either ZlibError Chunks forall a. (forall s. Zlib s a) -> Bytes -> Either ZlibError a runZlib Zlib s Chunks forall s. Zlib s Chunks Raw.decompress Bytes inp