Module `Decompress_impl.Zlib_inflate`Source

Sourcetype ('i, 'o) t = {

d : ('i, 'o) RFC1951_inflate.t;
z : ('i, 'o) state;

}

and ('i, 'o) k =
  (Safe.read, 'i) Safe.t ->
  (Safe.write, 'o) Safe.t ->
  ('i, 'o) t ->
  ('i, 'o) res

Sourceand ('i, 'o) state =

| Header of ('i, 'o) k
| Inflate
| Adler32 of ('i, 'o) k
| Finish
| Exception of error

Sourceand ('i, 'o) res =

| Cont of ('i, 'o) t
| Wait of ('i, 'o) t
| Flush of ('i, 'o) t
| Ok of ('i, 'o) t
| Error of ('i, 'o) t * error

Sourceand error = error_z_inflate

Sourceval pp_error : Format.formatter -> error_z_inflate -> unit

Sourceval pp_state : Format.formatter -> ('a, 'b) state -> unit

Sourceval pp : Format.formatter -> ('a, 'b) t -> unit

Sourceval error : ('a, 'b) t -> error -> ('a, 'b) res

Sourceval ok : ('a, 'b) t -> ('a, 'b) res

Source

val get_byte : 
  ctor:
    ((([< `Read | `Write Read ] as 'a, 'b) Safe.t ->
       'c ->
       ('d, 'e) t ->
       ('d, 'e) res) ->
      ('d, 'e) state) ->
  (int -> ('a, 'b) Safe.t -> 'c -> ('d, 'e) t -> ('d, 'e) res) ->
  ('a, 'b) Safe.t ->
  'c ->
  ('d, 'e) t ->
  ('d, 'e) res

Source

val get_with_holding : 
  ctor:
    ((([< `Read | `Write Read ] as 'a, 'b) Safe.t ->
       'c ->
       ('d, 'e) t ->
       ('d, 'e) res) ->
      ('d, 'e) state) ->
  (int -> ('a, 'b) Safe.t -> 'c -> ('d, 'e) t -> ('d, 'e) res) ->
  ('a, 'b) Safe.t ->
  'c ->
  ('d, 'e) t ->
  ('d, 'e) res

Source

val peek_bits : 
  ctor:
    ((([< `Read | `Write Read ] as 'a, 'b) Safe.t ->
       'c ->
       ('d, 'e) t ->
       ('d, 'e) res) ->
      ('d, 'e) state) ->
  int ->
  (('a, 'b) Safe.t -> 'c -> ('d, 'e) t -> ('d, 'e) res) ->
  ('a, 'b) Safe.t ->
  'c ->
  ('d, 'e) t ->
  ('d, 'e) res

Source

val drop_bits : 
  ctor:
    ((([< `Read | `Write Read ] as 'a, 'b) Safe.t ->
       'c ->
       ('d, 'e) t ->
       ('d, 'e) res) ->
      ('d, 'e) state) ->
  int ->
  (('a, 'b) Safe.t -> 'c -> ('d, 'e) t -> ('d, 'e) res) ->
  ('a, 'b) Safe.t ->
  'c ->
  ('d, 'e) t ->
  ('d, 'e) res

Sourcemodule KHeader : sig ... end

Sourcemodule KCrc : sig ... end

Source

val adler32 : 
  (Safe.read, 'a) Safe.t ->
  (Safe.write, 'b) Safe.t ->
  ('a, 'b) t ->
  ('a, 'b) res

Source

val inflate : 
  (Safe.read, 'a) Safe.t ->
  (Safe.write, 'a) Safe.t ->
  ('a, 'a) t ->
  ('a, 'a) res

Source

val header : 
  (Safe.read, 'a) Safe.t ->
  (Safe.write, 'b) Safe.t ->
  ('a, 'b) t ->
  ('a, 'b) res

Source

val eval : 
  'a Decompress_impl__.Decompress_b.t ->
  'a Decompress_impl__.Decompress_b.t ->
  ('a, 'a) t ->
  [> `Await of ('a, 'a) t
  | `End of ('a, 'a) t
  | `Error of ('a, 'a) t * error
  | `Flush of ('a, 'a) t ]

Sourceval default : 'a Window.t -> ('b, 'a) t

Sourceval refill : int -> int -> ('a, 'b) t -> ('a, 'b) t

Sourceval flush : int -> int -> ('a, 'b) t -> ('a, 'b) t

Sourceval used_in : ('a, 'b) t -> int

Sourceval used_out : ('a, 'b) t -> int

Sourceval write : ('a, 'b) t -> int

include sig ... end

Source

val to_result : 
  'a B.t ->
  'a B.t ->
  ('a B.t -> int) ->
  ('a B.t -> int -> int) ->
  ('a, 'a) t ->
  (('a, 'a) t, error) result

Source

val bytes : 
  B.Bytes.t ->
  B.Bytes.t ->
  (B.Bytes.t -> int) ->
  (B.Bytes.t -> int -> int) ->
  (B.st, B.st) t ->
  ((B.st, B.st) t, error) result

Source

val bigstring : 
  B.Bigstring.t ->
  B.Bigstring.t ->
  (B.Bigstring.t -> int) ->
  (B.Bigstring.t -> int -> int) ->
  (B.bs, B.bs) t ->
  ((B.bs, B.bs) t, error) result

package decompress

Module Decompress_impl.Zlib_inflateSource

Module `Decompress_impl.Zlib_inflate`Source